#!/usr/local/bin/perl use strict; use warnings; use Mail::Mailer; my %headers = ( 'To' => 'foo@bar.com', 'From' => 'bar@foo.com', 'Subject' => 'test' ); my $body = "Test Test"; my $mailer = new Mail::Mailer 'sendmail'; $mailer->open(\%headers); print $mailer $body;
Now was that so hard ... it's right out of the documentation. No free pass next time.
In reply to Re^3: Mail::Mailer on NT
by derby
in thread Mail::Mailer on NT
by perlTech
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |