in reply to Re^2: how to extract original string from binary files?
in thread how to extract original string from binary files?

As you mention EBCDIC, are you aware that Perl can decode EBCDIC data very well?

Usually decoding the conent of (PIC X) fields using 

my $printable = decode('cp37', $input);

[download]
or 
my $printable = decode('cp1047', $input);

[download]

In Section Seekers of Perl Wisdom