bommerlunder-code (anfängerfrage an die golfer) - #103082 (Allgemeines zu Perl)

heihon

2007-11-26 22:11

User since
2006-09-15
15 Artikel
BenutzerIn
[default_avatar]

nyxx+2007-11-25 19:56:51--
aber dafür nix mehr endlos. ;-)
...

285. geht da noch was?

Ja, ein wenig (264).
Und außerdem ist es viel übersichtlicher, wenn alles in eine Zeile passt ;-)

Code (perl): (dl )

($i,$j,$k,$l,$m,$o,$",$x)=split/%/," belegte% Brot%Schinken%isgekuehlt%Bommerlunder%$/Und dazu:$/% - %s";sub o{"$_$i$x$j mit @_!$/"}while(++$_){print"E${l}er $m -$/$m e${l}.$/"x2,$o,o($k,$k),o(Ei,Ei),"Das sind ",$_*2,"$i${j}e,$/$_ mit $k und $_ mit Ei.$/$o";$x=''}

Die endlose Version

Code: (dl )

while(++$_)

ist sogar mindestens zwei Byte kürzer, als die Version mit Ende z.B.

Code: (dl )

while(++$_<4)

aber letztere eignet sich besser zum Testen.