Well, you could certainly write your own code to do everything those packages do but it seems to me it would be easier to learn how to use the existing packages. Why don't you want to use those modules?

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