I have installed the following program on my desktop and trying to run on a Dos prompt while online but doesn't send mail. Here is the code that I am trying to test.
<CODE>
#!/usr/bin/perl -w
use Mail::Mailer;
print "\nTo: ";
$dest = <STDIN>;
chomp $dest;
print "Subject: ";
$subj = <STDIN>;
chomp $subj;
print "\nBody:\n";
$body = <STDIN>;
$mailer = Mail::Mailer->new("smtp", Server=> "pop.prodigy.net");
$mailer->open( { From => 'Mr Grits <xyz@prodigy.net>',
To => "burn_hall@yahoo.com",
Subject => "TESTING THE MAIL" } )
or die "Could'nt do it: $!\n";
print $mailer $body;
$mailer->close();

thanks for help