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();