in reply to Wow
Unrecognized character in execution. \xBE,\xBA,\x86,\x80,\x92 Æ , ¾ , º , ‡ , … , ƒ if i replace this characters not show result. obvious. [download]
@_ = map { [ $!++ => $_ ^ $/ ] } split $╛ => "\@\x7Fy~*kde~box*Z +oxf*Bkiaox"; $\ = "\r"; $| = ++$*; do { ( $# => $= ) = ( rand @_ => rand @_ ); @_[ $#, $= ] = @_[ $=, $# +] } for ( $* .. @_ ); for $: ( $| .. @_ - $| ) { for ( $| .. @_ - $: ) { @_[ $_ - $|, $_ ] = @_[ $_ => $_ - $* ] if $_[$_][ $║ ] < $_[ $_ - $* ][$╞]; print +map { $_->[$|] } @_; select $à, $â, $ç, "$[.$|"; } } print $/ [download]
www.com | www.net | www.org
5.003 (Camel Book 2nd Edition) 5.6 (Camel Book 3rd Edition) 5.8 (stable version for >5 years) 5.10 (many new features now in common use) 5.16 (Camel Book 4th Edition) 5.18 (hash overhaul) 5.26 (no "." in @INC) 5.36 (subroutine signatures) Dynamic (no standard; code dictates VERSION) Other (discuss in comments)
Results (39 votes). Check out past polls.