print map{chr(unpack("N",pack("B32",0 x 25 .$_)))}join( "",map{s/(\d)(\d)/$2x$1/ge;$_}join("",split(/\n/,"11201 1101110311011000000000010412051000000101130115011000000 0000503110310000000010211071100000112021101130210000201 1104120111000001011501110112000000020212011104100002011 1021102130000000115011201120000000001021403120000000104 110111041000020111041201110"))=~m/(.{18})/g)=~/(.{7})/g
In reply to Just Another JAPH by jimt
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |