zoned decimal - Perl

Is there a module that deals with zoned decimal from the mainframe '}'is plus zero for example, after it is converted to ASCII?Convert::IBM390 only seems to handle it in ebcdic format and it isalready mucked up before we get the file.......(with 1 answers.)