Select Code to Download

#!/usr/bin/perl
use strict;
...
#so far, so good
        $packed_stuff=pack("H16", $print_this);
print $packed_stuff."\n";