That did the trick!

I got into a bad habit of using ampersands for every call to a sub when I first started learning Perl. I realize that its not always a good idea, especially in a case like this.

I nested that for lack of knowing better, put simply. Thanks for the advice, sorry about the confusion in my writeup.

And no, I didn't not want it to call everytime a line did not match. I was writing this in a hurry, and intern proved that patience pays off, cause had I been patient, I would not have had this problem!!

/me loves learning new stuff everyday, just wish I could spend more time learning more Perl!

--~~--~~--~~--~~--~~--~~--~~--~~--~~--~~--~~--~~--~~--

perl -e '$a="3567"; $b=hex($a); printf("%2X\n",$a);'