Help for this page
my $string = pack('a*','123456'); foreach (my $i=0; $i<length($string); $i++) { printf("%02x ", substr($ +string,$i,1)); } print "\n";
$string .= pack('a', 0x1c); foreach (my $i=0; $i<length($string); $i++) { printf("%02x ", substr($ +string,$i,1)); } print "\n";