| Subject: | Debug file handle is closed |
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