> 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.

I recommend to use 'perl -cw foo.pl' to test scripts.

> 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');
          ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ 

This is a parameter for subroutine, which at least should be anonymous
hash like

  {'Server' => 'email.somecompany.com'}

I also recommend 'Perl Cookbook' from O'Reilly.

I hope this helps you.
Masao