Trouble sending an email with Mailer module

[laredotornado]

Hi,

I'm having some trouble getting the Mailer module to work. I keep
getting this error

No recipient addresses found in header

although in my code, below, I include a "To" clause. But clearly I'm
doing something wrong ...

my $body = "Blah blah blah:\n\n";

my %headers = {From => "$p_sender",
To => "$p_recipient",
Subject => "$p_subject"
};
my $mailer = Mail::Mailer->new();
$mailer->open(\%headers);
print $mailer $body;
$mailer->close;

Any ideas? Thanks, - Dave

 

[Ch Lamprecht]

Hi,

use strict;
use warnings;

my $body = "Blah blah blah:\n\n";

my %headers = {From => "$p_sender",
^ To => "$p_recipient",
^ Subject => "$p_subject"
^ };

-------------^a hash --^ a hashref

my $mailer = Mail::Mailer->new();
$mailer->open(\%headers);
print $mailer $body;
$mailer->close;

Any ideas? Thanks, - Dave

HTH Christoph

 

[Gunnar Hjalmarsson]

I'm having some trouble getting the Mailer module to work. I keep
getting this error

No recipient addresses found in header

although in my code, below, I include a "To" clause. But clearly I'm
doing something wrong ...

Indeed you are; you ask for help here before asking Perl to help you by
using warnings.