use Mail::Sender;
my $sender = Mail::Sender->new({smtp => 'smtp.server', from =>
'[EMAIL PROTECTED]'});
$sender->MailFile({to => '[EMAIL PROTECTED]', subject => 'Here is the file',
msg => "I'm sending you the list you wanted.", file =>
'sender.pl'});
-----Original Message-----
From: Mike Singleton [mailto:[EMAIL PROTECTED]]
Sent: Monday, September 23, 2002 10:57 AM
To: [EMAIL PROTECTED]
Subject: mail::sender question
What am I fumbling here?? Perl wants an explicit package name...
use Mail::Sender;
new Mail::Sender
$sender = {smtp => 'smtp.mailhost.com', from =>
'[EMAIL PROTECTED]'};
$sender->MailFile({to => '[EMAIL PROTECTED]', subject => 'Here is
the file',
msg => "I'm sending you the list you wanted.",
file => 'myfile.csv'});
===
Mike Singleton
Network Analyst
(253) 272-1916 x1259
(253) 405-1968 (cellular)
[EMAIL PROTECTED]
DaVita Inc.
_______________________________________________
Perl-Win32-Admin mailing list [EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
---
Incoming mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.391 / Virus Database: 222 - Release Date: 9/19/2002
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
