use Mail::Sender;
 my $mailtext = "Das ist der Text\nden ich gerne senden wuerde...";

  my $sender = new Mail::Sender {
                smtp => 'smtpout.unseredomain.com',
                from => 'name@unseredomain.com',
#                auth => 'LOGIN',
#                authid => 'username',
#                authpwd => 'passwort',
                on_errors => undef,
  }  or die "Can't create the Mail::Sender object: $Mail::Sender::Error\n";

  $sender->MailMsg({to => 'name@gmx.de',
                    subject => 'Testmail',
                    msg => $mailtext}) or print $Mail::Sender::Error;