fast ...

[Sven]

Hi,

Ich auch nicht. Aber ich kann mir darunter auch nichts vorstellen.

Immerhin hab ich gerade das auf search.cpan.org gefunden - das hilft etwas bei der Vorstellung, denke ich:

use Perl6::Classes;

class Composer {
        submethod BUILD { print "Giving birth to a new composer\n" }
        method compose { print "Writing some music...\n" }
    }

class ClassicalComposer is Composer {
        method compose { print "Writing some muzak...\n" }
    }

class ModernComposer is Composer {
        submethod BUILD($) { $.length = shift }
        method compose() { print((map { int rand 10 } 1..$.length), "\n") }
        has $.length;
    }

my $beethoven = new ClassicalComposer;
    my $barber    = new ModernComposer 4;
    my $mahler    = ModernComposer->new(400);

$beethoven->compose;   # Writing some muzak...
    $barber->compose       # 7214
    compose $mahler;       # 89275869347968374698756....

Leider ist das Ding Beta und in Entwicklung. Also vielleicht nicht unbedingt für eine Produktionsmachine ;(

Bin also immer noch dankbar für andere Wege.

danke
Sven