#!usr/bin/perl -w
  use MIME::Lite;
 $msg = MIME::Lite->new(
        From     =>'me@myhost.com',
        To       =>'marceric@free.free',
        Cc       =>'projet.chibani@gmail.com, revoil@et.esiea.fr',
        Subject  =>'Helloooooo, ça marche!',
        Data     =>"How's it goin', eh?"
    );