Greetz$e="\x00\x00\x00\x09\xE7\x92\x09\x24\x92\x09\x24\x92\x09\xE7\x9E\x49\x +24\x12\x79\x24\x12\x00\x00\x00"; foreach(split//,unpack("B192",$e)){print $_ == 1?"*":".";$c++;if ($c== +24){print $/; $c=0;}}
In reply to first try at JAPH by Beatnik
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |