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, $file1 ]
        msg => $email_body});

}