my $last_byte = pack('c', hex 'DC');   # line 109