«

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

wrote:
> 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
--

perl -e "print scalar reverse q//"

wrote:
> 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.

--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl