Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl -w

...
 
Data: $d1, length $d2
EOF

Select or download this

---
print map { my ($m)=1<<hex($_)&11?' ':'';
$m.=substr('AHJPacehklnorstu',hex($_),1) }
split //,'2fde0abe76c36c914586c';