Perl MIME::Base64 Question

Matt King <[email protected]>
Newsgroups gmane.org.user-groups.linux.pdxlug
Message-ID <[email protected]>
I'm so close to getting this done, but I'm stuck on the last piece.

I have an e-mail that is sent to a user on my system.  I wrote a script 
to parse the csv attachment on it and dump the output to a folder.  I 
have procmail filter it through the script.

The problem is, the csv is attached and encoded in base64.  Now, I got 
it to decode correctly.  If I run the script at the CLI it spits out the 
e-mail with the csv decoded at the end of the output.  All I want the 
decode.pl script to do is look at the input and if it runs into base64 
attachments, lump all the lines of encoded stuff into one variable, then 
print that variable decoded.  But if I do this in procmail:

* ^To: blah
|$HOME/decode.pl | $HOME/parse.pl

The output of the base64 decoded string is mangled into weird 
characters, and the parse.pl script won't recognize it.

Is there a way to get perl to output regular text so the next perl 
script will be able to understand it?
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.