in reply to Re^2: File I/O question
in thread File I/O question
the "sendmail" is to be replaced with the mail program like xmail (i use xmail)use Mail::Mailer; $mailer=Mail::Mailer->new("sendmail"); $mailer->open ({ From=> <from address here>, To=> <to address here>, Subject=> <subject here>, }) or die "cant open mailer\n"; $body=<>; print $mailer $body; $mailer->close();
|
|---|