Skip Menu |
 

Preferred bug tracker

Please visit the preferred bug tracker to report your issue.

This queue is for tickets about the Mail-Sender CPAN distribution.

Report information
The Basics
Id: 32615
Status: rejected
Priority: 0/
Queue: Mail-Sender

People
Owner: JENDA [...] cpan.org
Requestors: danjer [...] doudouke.org
Cc:
AdminCc:

Bug Information
Severity: Normal
Broken in: 0.8.13
Fixed in: (no value)



Subject: Debug file handle is closed
Download (untitled) / with headers
text/plain 880b
Hi, The debug file handle is also closed by the "Close" method : $sender = new Mail::Sender ({ ... debug => \*STDERR, debug_level => 4 }); $sender->OpenMultipart({to => 'Perl-Win32-Users@activeware.foo', subject => 'Mail::Sender.pm - new version'}); $sender->Body({ msg => <<'*END*' }); Here is a new module Mail::Sender. It provides an object based interface to sending SMTP mails. It uses a direct socket connection, so it doesn't need any additional program. Enjoy, Jenda *END* $sender->Part( {description => 'Perl module Mail::Sender.pm', ctype => 'application/x-zip-encoded', encoding => 'Base64', disposition => 'attachment; filename="Sender.zip"; type="ZIP archive"', msg => $sender_zip_contents, }); $sender->Close; # <- STDERR is closed Best Regards, Danjer
Download (untitled) / with headers
text/plain 204b
It doesn't happen to me. What version of Perl do you have? Could you tell me what does this snippet of code print using your perl? sub what {print "$_[0] and ref=" . ref($_[0]) . "\n"}; what(\*STDERR);
I'm unable to replicate the problem


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.