Closed p5pRT closed 20 years ago
When using Mail::Sender if I do not supply a value to 'to' in OpenMultipart the module dies prematurely without a descriptive error.
It should be able to handle sending an e-mail with no 'to' address\, as long as there is a cc or bcc.
here is a snip of code I used to get it to die: note: the $FORM{'to'} = "";
use Mail::Sender; ref($sender = new Mail::Sender {smtp => 'mailhost.summithq.com'}) || die "$sender -- $Mail::Sender::Error\n";
$sender->OpenMultipart({from => $FORM{'from'}\, to=> $FORM{'to'}\, cc => $FORM{'cc'}\, subject => $FORM{'subject'} } ) || die "2 $Mail::Sender::Error\n";
$sender->Body; ## dies here when to is empty
$sender->Send("$FORM{'mess'}");
$sender->SendFile({ ctype => "$app/$type"\, encoding => 'Base64'\, file => "$file" }) || die "3 $Mail::Sender::Error\n"; $sender->Close() || die "4 $Mail::Sender::Error\n";
On Tue\, Feb 12\, 2002 at 05:23:05PM -0500\, Nikola Janceski wrote:
This is a bug report for perl from njancesk@deliv1.summithq.com\, generated with the help of perlbug 1.33 running under perl v5.6.1.
----------------------------------------------------------------- [Please enter your report here] When using Mail::Sender if I do not supply a value to 'to' in OpenMultipart the module dies prematurely without a descriptive error. \
perlbug is indented to report bugs in the perl core\, not CPAN modules. As the author of Mail::Sender likely won't see this message\, I've taken the liberty of forwarding your report onto him (Jan Krynicky \Jenda@​Krynicky\.cz).
In the future\, consider either sending mail to the author or use the new CPAN bug tracking system at rt.cpan.org.
--
Michael G. Schwern \schwern@​pobox\.com http://www.pobox.com/~schwern/ Perl Quality Assurance \perl\-qa@​perl\.org Kwalitee Is Job One The drill instructors Have their pots of paste in hand Now the ass games start -- ignatz
This report is about the non-core Mail::Sender module. It has been forwarded to the author.
--
Michael G. Schwern \schwern@​pobox\.com http://www.pobox.com/~schwern/ Perl Quality Assurance \perl\-qa@​perl\.org Kwalitee Is Job One "You killed my fish?" "Why does that pickle you?" http://sluggy.com/d/010204.html
Migrated from rt.perl.org#8507 (status was 'resolved')
Searchable as RT8507$