Problems? Is your data what you think it is? | |
PerlMonks |
comment on |
( [id://3333]=superdoc: print w/replies, xml ) | Need Help?? |
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 In reply to Re: Re: Problem in sending Form data via email
by hallian92
|
|