$clock = 'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF05'; #### use warnings; use strict; my $clock = pack('H34','FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF05'); print "clock:$clock:\n"; for (split //, $clock) { print "$_:", ord $_, ":\n"; } #### clock:\uffff\uffff\uffff\uffff\uffff\uffff\uffff\uffff\uffff\uffff\uffff\uffff\uffff\uffff\uffff\uffff: \uffff:255: \uffff:255: \uffff:255: \uffff:255: \uffff:255: \uffff:255: \uffff:255: \uffff:255: \uffff:255: \uffff:255: \uffff:255: \uffff:255: \uffff:255: \uffff:255: \uffff:255: \uffff:255: :5: #### $clock = 'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF05'; $clock = 'F' x 32 . '05';