use Net::SMTP; my $smtp = Net::SMTP->new('smtp.gmail.com', Hello => 'smtp.gmail.com', Timeout => 30, Debug => 1, SSL => 1, ); $smtp->auth($CFG->{db_smtp_user}, $CFG->{db_smtp_pass}); $smtp->data(); $smtp->datasend($email); $smtp->dataend();