Select Code to Download

open(IN, '<', $ifilename);
binmode(IN);
...
}
[...]
my $newbin = pack("...", $hexstring);