send_email(); sub send_email { my $sender=new Mail::Sender({from =>$email_sender, fake_from =>$email_sender,smtp => 'mail.test.com'}); $sender->MailFile({to => $email_recipient, subject => $email_subject, file=> $outfile, file=> $file1, msg => $email_body}); }