|
Posted by Deepan Perl XML Parser on April 10, 2008, 1:20 am
Please log in for more thread options
my $email = populateEmail("test");
print $email;
open(SENDMAIL, "|/usr/lib/sendmail -oi -t -i") or print "cannot open
SENDMAIL: $!";
print SENDMAIL <<"EOF";
To: $
Subject: [SUSTAINING TICKET] Case
Content-type: text/html
testing
EOF
close(SENDMAIL);
The above code results in "No recipient address found in header"
but when i replace $ with direct address say deepan.
17\@gmail.com it works fine.
populateEmail function's code is available below:
sub populateEmail {
if(lc($_[0]) eq "test") {
return ("deepan.17\@gmail.com");
}
}
Can anyone spot the bug?
|