use MIME::Lite;
 
 $msg = MIME::Lite->new(
        From     =>'myname@gmail.com',
        To       =>'myname@gmail.com',
        Subject  =>'Helloooooo, nurse!',
        Data     =>"How's it goin', eh?"
    );
    
     $msg->send('smtp', 'smtp.gmail.com', AuthUser=>'myname@gmail.com', AuthPass=>'mypassword', Debug=>1);