Help for this page

Select Code to Download


  1. or download this
    use strict;
    use warnings;
    ...
    my $p = pack $template, $nv;
    
    system $^X, '-wle', 'print $ARGV[0]', unpack('H*', $p);