jason corbett wrote:
I am using the script below to mail out attachments after running a job. When I run the script, it send out an email with an attachment that is untitled and blank. I want to add the attachment which is a text file (myfile.txt) located in /home/servername/myfile. Can you see what is wrong in my file?
Thanks,
JC
sub mailman {
my $message=MIME::Lite->new(
From =>'[EMAIL PROTECTED]',
To =>'[EMAIL PROTECTED]',
Subject =>'This is a test of the MIME::Lite Mod',
Type =>'text/plain',
);
$message->attach ( From =>'[EMAIL PROTECTED]',
To =>'[EMAIL PROTECTED]',
Subject =>'This is a test of the MIME::Lite Mod',
Type =>'text/plain',
Path =>'/home/samcsm/jason/treatment',
Id =>'fourdayout.txt',
These two entries are not what you said above, is that it by chance?
$message->send;
return;
}#end of mailman subroutine
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
