jw220635 - 2012-02-07

I think I have the solution. It has to EBCDIC transliteration in Perl.

After checking the EBCDIC charater table vs. ASCII the following solution worked!

$field[$pos_date] =~ tr/\x6b\x60\x4b\x61\x05/:::::/s; # " \t" is used instead of "\s" not known with tr