RDW #2 - Rätsel der Woche Nr. 2 - #84500 (Allgemeines zu Perl)

steve

2004-07-20 14:53

User since
2004-03-04
52 Artikel
BenutzerIn
[default_avatar]

[quote=betterworld,20.07.2004, 12:18]53 Zeichen!

Code (perl): (dl )

1
2

print"(@x[grep$i&1<<$_,0..@x])
"until$i++>>(@x=@ARGV)

Die Idee kam mir gerade in einer Vorlesung. Da bin ich schnell an den Computer gerannt um es zu testen und zu posten. Ich gehe dann jetzt mal wieder in die Vorlesung :)[/quote]
also bei mir funktionier die Lösung nicht!
Es wird nur "()" aufgegeben.

steve