$mailer= Mail::Mailer->new(...)
  or die qq{$0: Can't create mailer object: $!};