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

2004-07-20 14:40

User since
2003-08-04
247 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]
Krass, es ging doch noch kürzer... mal schaun was der >>-Operator eigentlich genau macht...