BTW, the return result part there at the end =-- the only place Perl has more lines than Java to do the same thing --can be done in one line with a trinary, like so: return wantarray?split(//, $hex):$hex;