use strict;
use warnings;
use Net::SMTP;
 
my $smtp = Net::SMTP->new('mail.gmx.com',
						   Hello => 'Rob.nl',
                           Timeout => 30,
                           Debug   => 1,
                           SSL     => 1,
						   Port => 465
                          );

$smtp->auth('accountname@gmx.com','password');
$smtp->mail('accountname@gmx.com');
$smtp->to('someone@gmail.com');
$smtp->data;
$smtp->datasend("Hi.");
$smtp->dataend;
$smtp->quit;