in reply to Nibble swap


Here is another way:     $swap = pack 'h2', unpack 'H2', $char;

--
John.

In Section Cool Uses for Perl