Dirk: <STDIN> abfangen

Beitrag lesen

hi,

ich hab folgendes problem und weder im forumsarchiv noch sonstwo 'ne lösung gefunden:

ich möchte, daß eingehende emails an einen bestimmten user sofort nach eingang von einem script weiterverarbeitet werden. dazu hab ich 'nen alias angelegt (eintrag in /etc/aliases: user_xy: "|/usr/bin/perl /usr/local/user_xy/cgi-bin/mailbox.pl"). code in mailbox.pl:
<schnipp>
my $data = <STDIN>;
open(MAIL, ">/usr/local/user_xy/mailbox/test.txt");
print MAIL "$data";
close(MAIL);
<schnapp>
das klappt auch soweit...bis zum ende der ersten, übergebenen zeile, mehr steht nämlich in test.txt nicht drin. eine mail incl. headers besteht allerdings aus vielen zeilen. ich weiß, daß in der vordef. variable $/ das newslinezeichen voreingestellt ist, welches ich auch ändern kann, aber in was? oder besser: wann weiß ich, daß die eingabe beendet ist? oder kann ich schon vorher das newslinezeichen aus der eingabe eliminieren?

für lösungsvorschläge wäre ich sehr dankbar.

gruß,

Dirk