use Convert::Recode qw(ebcdic_to_ascii);
while (<>) {
print ebcdic_to_ascii($_);
}
mac_to_latin1()
function.
If you prefix the function name with ``strict_'' then characters that can
not be mapped are removed during transformation. For instance the
strict_mac_to_latin1() function will convert to a string to
latin1 and remove all mac characters that have not corresponding latin1
character.
Running the command recode -l should give you the list of character sets available.