##
MIME::Lite->send('smtp', 'smtp.gmail.com:587', Timeout => 60,AuthUser=>$user, AuthPass=>$pass);$msg->send();
####
my $smtp = new Net::SMTP::TLS(
'smtp.gmail.com',
Hello => 'test.org',
Port => 587,
User => $user,
Password=> $password,
Timeout => 30
);