0: #!/usr/bin/perl -nietianmsurwdkgohvf_l_pjbxcyzq 1: # --. --- - .--. . .-. .-.. 2: y/-. //cd;for$^(split){for$b(1..80){$_=int($b/27) 3: .$b/9%3 .$b/3%3 .$b# by JH 4: %3;/[12]0/||do{y/120/.-/d;$^eq 5: $_&&print substr$^I,$c,1;$c++}}$c=0} # and RC
In reply to --. --- - .--. . .-. .-.. by Anonymous Monk
For: | Use: | ||
& | & | ||
< | < | ||
> | > | ||
[ | [ | ||
] | ] |