Select Code to Download

   $mailer = Mail::Mailer->new("mail");
   $mailer->open({From=>$from_address,
...
            or die "Can't open: $!\n";
   print $mailer @body;
   $mailer->close();