If everything you need is to send a simple message you may use: 

use Mail::Sender;


ref ($sender = new Mail::Sender({
     from => 'somebody@somewhere.com',
     smtp => 'ms.chipnet.cz'})
    ) or die "$Mail::Sender::Error\n";


(ref ($sender->MailMsg({
      to      => 'Jenda@Krynicky.czX',  
      subject => 'this is a test',
      msg => "Hi Johnie.\nHow are you?"})
      ) and print "Mail sent OK."
) or die "$Mail::Sender::Error\n";
 __END__