use Mail::Sender 
{from => 'navette@mat.ensmp.fr', smtp =>'mail.materiaux.ensmp.fr'}; 
my $sender = new Mail::Sender