Like
$smtp = Net::SMTP->new('');
$smtp->mail('');
$smtp->to("");
$smtp->data();
$smtp->datasend("To: [EMAIL PROTECTED]");
$smtp->datasend("Subject: xxxxxxxxxxxxxxxxxxxxxxxxxxxxxn");
$smtp->datasend("Sent: xx:xx::xx \n");
$smtp->datasend("\n");
$smtp->datasend("xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx\n");
$smtp->datasend("\n");
$smtp->dataend();
$smtp->quit;
For this didn't work.
thanks,
John
-----Original Message-----
From: Tim Johnson [mailto:[EMAIL PROTECTED]
Sent: Thursday, December 04, 2003 1:01 PM
To: John Deretich; Perl-Win32-Admin-Request (E-mail)
Subject: RE: :SMTP
I think you just need to add a line in the header portion of the data.
Something like "Sent: xx-xx-xx xx:xx:xx"
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
John Deretich
Sent: Thursday, December 04, 2003 12:43 PM
To: Perl-Win32-Admin-Request (E-mail)
Subject: NET::SMTP
Hi,
My emails are being sent with no sent date.
How can I use NET::SMTP to fix the problem?
thanks,
John
_______________________________________________
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
