Thread Perl 6 Adventskalender (22 answers)
Opened by moritz at 2009-12-01 23:59

sid burn
 2009-12-09 10:39
#129133 #129133
User since
2006-03-29
1520 Artikel
BenutzerIn

user image
Ging so. Den Metaoperator [] (reduce) hatte ich soweit schon verstanden. Bei mir happerte es mehr bei ">>" Und sachen wie ">>+<<" etc. Aber Türchen 6 hat das eigentlich ganz gut erklärt. Ich denke ich habe ihn jetzt verstanden.

Ansonsten möchte ich für die kleinigkeit kein türchen aufmachen, aber mit tür 8 mit ".comb" hatte ich die Idee mal eine kleine Routine zu schreiben das eine Zahl Formatiert lesbarer formatiert und jede drei zeichen von rechts ein "." einfügt. Ich bin auf das ergebnise gekommen. Meiner meinung nach irgendwie zu kompliziert:

Code: (dl )
1
2
sidburn@sid:~$ perl6 -e '1234567890.comb.reverse.join.comb(/<digit>**{1..3}/).join(".").comb.reverse.join.say'
1.234.567.890


Verbesserungsvorschläge? Anregungen?
Ich dachte zumindest "reverse" auf einem Int würde es zu einem String umwandeln und wie Perl 5 den String umdrehen. aber anscheind bewirkt es nichts. Zumindest ist mir nicht ersichtlich was es tut, daher ".comb" um die zahl in einer liste umzuwandeln und das joinen etc. dachte ursprünglich eher an solch einer Variante.

Code: (dl )
perl6 -e '1234567890.reverse.comb(/<digit>**{1..3}/).join(".").reverse.say'
Nicht mehr aktiv. Bei Kontakt: ICQ: 404181669 E-Mail: perl@david-raab.de

View full thread Perl 6 Adventskalender