Or you could go the kloodge route and create a hex-to-character lookup:

@chars = (0..9, 'A'..'Z');
for (0..255) {
    $hex{$chars[int($_ / 16)].$chars[$_ % 16]} = chr($_);
}
[download]

Just feed it two hex characters and it returns the regular string character.