This code works for me
-----
#!/usr/bin/perl
use strict;
use warnings;
use MIME::Lite;
my $msg = MIME::Lite->new(
From => '"Paul Kraus" [EMAIL PROTECTED]',
To => '[EMAIL PROTECTED]',
Subject => 'RE:SMTP From field using MIME::Lite - Test Send',
Data => 'This message sent with mime lite'
);
MIME::Lite -> send ('smtp','my.mailserver.com' );
$msg -> send;
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
