Perlmonk code
Obfuscated Code
Live and Die
Live, coplete your mission, delivery your legacy and die.
{split" ",(join"",@ARGV)|| ("12 1 2 1 1 1 1 2 1
1 1 1 2 1 4 1 0 11 1 2 1 4 1 2 1 4 1 2 1 4 1
0 4 1 4 1 2 1 1 1 1 2 1 1 1 1 2 1 1 1 1 0 3 1
4 1 2 1 4 1 2 1 8 1 4 1 0 2 1 1 1 1 2 1 4 1 2 1
8 1 4 1 0 0")}{$^=shift@_}{$^{1}="_/"and$^{0}="
"}_:{$^==0|| $^==1?print$^{$^}:print" "x$^}{$^=
join" ",@_ }{$^="'$^'"}@_!=1?exec"perl $0 $^":_
