Thanks for that pointer to serializers.
I have done the following as a first attempt.
Just send the hex.
The one thing that gets me with this, is that
when the last print occurs, it messes up my display,
putting everything in binary.
How do I prevent this? Anyone?
#!/usr/bin/perl
use strict;
use warnings;
open(FH,"<adminpass");
binmode FH;
my $binstring= <FH>;
print "$binstring\n";
my $hexstr= unpack "H*",$binstring;
print "$hexstr\n";
my $binback= pack "H*",$hexstr;
print "$binback\n";
|