use Net::SMTP;
     my $smtp = Net::SMTP->new('smtp.gmail.com',
                           Hello => 'smtp.gmail.com',
                           Timeout => 30,
                           Debug   => 1,
                           SSL     => 1
                          ) || die "Error: $!";
     $smtp->auth($CFG->{db_smtp_user}, $CFG->{db_smtp_pass}) or die "Could not authenticate with mail.\n";
     $smtp->data();
     $smtp->datasend($email) || die $!;
     $smtp->dataend() || die $smtp->message();