if ( open(MAIL, "|/usr/lib/sendmail -i -t ") ) {
  print MAIL "To: $mailto\n";
  print MAIL "From: beispiel\@adresse.de\n";
  print MAIL "Subject: Hallo Test\n\n";
  print MAIL "Hallo $derName,\n$dieNachricht\n\n";
  close( MAIL ) || print STDERR "Mailprogramm konnte nicht gestartet werden";
} 
else {
  print STDERR "Mailprogramm konnte nicht gestartet werden";
}