my $smtp = Net::SMTP->new($config{server}, Timeout => 30);