飛び出せPerl6
飛び出せperl6
アスキーでステレオグラム。ワンライナーで『パール6』を浮き出させる。いまいち飛び出ないか…。もっとガンガレ…
$ perl6 -e 'sub MAIN($x,$y){ for 1..10 -> $i { for 1..7 -> $j { print ($i==9 and $j==6)??"$y "!!"$x ";}; print "\n";}}' ...perl... ..perl6... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ..perl6... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... ...perl... $