Hi Paul,

I have used Mail::Sender with good success with attachments.  Sample code snipet from 
an NT install follows.  The entire program created a spreadsheet of SMTP stats through 
Spreadsheet::WriteExcel and this portion mailed off the completed .xls file on the 1st 
of every month.

@MailMe = grep !-d, glob "c:/smtp/stats/*.xls";
ref ($sender = new Mail::Sender({from => '[EMAIL PROTECTED]',
smtp => '192.168.0.15'})) or die "$Mail::Sender::Error\n";
 (ref ($sender->MailFile(
  {to =>'[EMAIL PROTECTED]', cc =>'[EMAIL PROTECTED]', sub
ject => 'SMTP Stats for last month',
   msg => "Hello!\nThis email was generated from your SMTP server!\nI have
 compiled and archived all of the email stats for $mth-$yr and attached the resu
lts file.\n \n \n \nThis message was sent at $now[2]:$now[1] on $mth/$day/$yr.",
   file => \@MailMe
  }))
  and print "Mail sent OK."
 )
 or die "$Mail::Sender::Error\n: $!";


I have used it on *nix boxes as well.  HTH.
Later!


Bill Akins, CNE
Sr. OSA
Emory Healthcare
(404) 712-2879 - Office
12674 - PIC
[EMAIL PROTECTED]



>>> "Paul Kraus" <[EMAIL PROTECTED]> 01/14/03 03:09PM >>>
I did check cpan and there where many email modules. So I thought I
would ask the collective and see which ones people like to use.
NET::SMTP seem like it would work but I don't see  how you would send
attachments.

> -----Original Message-----
> From: Ben Siders [mailto:[EMAIL PROTECTED]] 
> Sent: Tuesday, January 14, 2003 3:06 PM
> To: Paul Kraus
> Cc: Perl
> Subject: Re: Recommend an email module?
> 
> 
> If not for the need for attachments, I'd suggest using the 
> 'mail' shell 
> command via the ` ` operator.  I don't know how to attach files using 
> 'mail', for all I know it may not even be possible.  This may be a 
> stupid question, but have you looked at the modules on CPAN yet?
> 
> Paul Kraus wrote:
> 
> >What does everyone recommend for an email module.
> >
> >I am setting up a server to email alerts to me. We are not using a 
> >local mail server. I would like to able to compose mail that has 
> >attachments and if possible embedded html.
> >
> >Paul Kraus
> >Network Administrator
> >PEL Supply Company
> >216.267.5775 Voice
> >216-267-6176 Fax
> >www.pelsupply.com 
> >
> >  
> >
> 
> 
> 
> -- 
> To unsubscribe, e-mail: [EMAIL PROTECTED] 
> For additional commands, e-mail: [EMAIL PROTECTED] 
> 



--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to