Perl: Mail verschickt ?

[Slobodan]

Hallo Leute,

bin am Ende meines Projekts und bleibt noch der "Mail-Teil".

Und da habe ich ein Problem.

Wie kann ich (mit Sicherheit) überprüfen, ob die Daten wirklich geschickt wurden.
Ich habe schon versucht an mich was zu schicken - und es dauert ... und dauert ... und ich weis jetzt nicht ob es funktioniert - oder nicht.

Gibt es ein Trick dafür ?

Unix Mail Program:
----------------------------------------
$mail_prog = "/usr/lib/sendmail";
----------------------------------------
und Standard Mail-Routine verwendet:
-----------------------------------------
sub mail {

open(MAIL,"|$mail_prog -t") || die;

print MAIL "To: [e-mail]\n";
print MAIL "From: $ema $nuv $frm\n";
print MAIL "Subject: Bestellung\n\n";

print MAIL "BESTELLUNG:\n";
   $i = 0;
   if ($flag1 == 1) {
print MAIL "VORSICHT: zweitbestellung<br>\n";
                    }
   while ($i <= $f_value[0] - 1) {
   $i++;
   }
print MAIL "----------------------------<br>\n";
print MAIL "Name und Vorname:$nuv<br>\n";
print MAIL "Firma:$frm<br>\n";
print MAIL "Position:$pos<br>\n";
print MAIL "Strasse:$str<br>\n";
print MAIL "PLZ:$plz<br>\n";
print MAIL "Ort:$ort<br>\n";
print MAIL "Ortsteil:$ors<br>\n";
print MAIL "Telefon:$tel<br>\n";
print MAIL "Fax:$fax<br>\n";
print MAIL "eMail:$ema<br>\n";
print MAIL "----------------------------<br>\n";
close(MAIL);
}
---------------------------------------------------

Log-Files zeigen kein Fehler.

Ich komme nicht weiter !

Und warten (ob vielleicht irgendwann mal der Mail kommt) kann ich auch nicht!

Vielen Dank im Voraus ?

Slobodan