I am trying to send a text file using MIME::Lite.
The file content is in text, and is similar to:
"smith","john","123 fake st.","springfield"
The file is being emailed and received fine, but the attachment appears as
garbled characters.
I don't know alot about MIME and encoding, but I think I'm am not using the
correct MIME Type ???
Here is the code being used:
$IN{from} = "you\@there.nowhere";
$IN{to} = "me\@here.nowhere";
$IN{file_name} = $temp_file_name; /* ex. test.txt */
$IN{path}="/data";
$IN{cc} = "";
$IN{subject} = "Extract file from script";
$msg = MIME::Lite->new(
From =>$IN{from},
To =>$IN{to},
Cc =>$IN{cc},
Subject =>$IN{subject},
Type =>'multipart/mixed',
Data =>"Attached is your extracted data file");
$msg->attach( Type =>'text/plain',
Path =>$IN{path},
Filename =>$IN{file_name}
);
$msg->send();
}
The script is being run from the directory that contains the file to be
attached and emailed.
Does anyone see anything obvious that I've misssed?
(I'm new to Perl as well)
I used the same code to send a gif file (MIME type image/gif), and that
worked as expected.
Thanks in advance.
Carl
_________________________________________________________________
Get your FREE download of MSN Explorer at http://explorer.msn.com/intl.asp
_______________________________________________
Perl-Unix-Users mailing list. To unsubscribe go to
http://listserv.ActiveState.com/mailman/subscribe/perl-unix-users
