Subject: perl Mail::Mailer
To: None <netbsd-help@netbsd.org>
From: None <collver@softhome.net>
List: netbsd-help
Date: 12/13/2000 11:43:34
One of my perl scripts doesn't work after moving it to NetBSD.  Does anyone
see what's wrong?

Ben.


output:
bash-2.04# perl test.pl
Can't locate object method "FILENO" via package "Mail::Mailer::smtp::pipe"
at /usr/pkg/lib/perl5/site_perl/5.6.0/Mail/Mailer.pm line 305.
        (in cleanup) Can't call method "FILENO" on an undefined value at
/usr/pkg/lib/perl5/site_perl/5.6.0/Mail/Mailer.pm line 305 during global
destruction.


script:
#!/usr/pkg/bin/perl -w
use Mail::Mailer;

$subject = 'sample subject';
$from_address = 'collver@softhome.net';
$to_address = 'collver@softhome.net';
$mailer = Mail::Mailer->new(
        'smtp',
        Server => 'email.somecompany.com');
$mailer->open({ From    => "$from_address",
                To      => "$to_address",
                Subject => "$subject" })
        or die "Can't open: $!\n";
print $mailer "sample content\n";
$mailer->close();