Mailtags f. Sendmail im Body

[Klaus Mock]

Hi Kurti,

open(ADR, "</usr/www/users/danfun/docs/" . $adress) or die "Fehler beim Oeffnen der Ausgebdatei: $!";
while(<ADR>)
{
        $currentadr = $_;

Da haben wir ja den kleinen Wicht;-)
Wenn Du so aus einer Datei ausliest, dann passiert das immer zeilenweise. Und zwar _inklusive_ Zeilenumbruch.
ein kleines, schnuckeliges 'chomp', und die Welt ist wieder heil.

&post;

}
close(ADR);

btw: Vielleicht solltest Du Dir mal die Sache mit Übergabewerten an Funktionen ansehen.

Das alles könnte dann so aussehen:
================cut================
open(ADR, "</usr/www/users/danfun/docs/" . $adress) or die "Fehler beim Oeffnen der Ausgebdatei: $!";
while(<ADR>)
{
        chomp;
        &sende_das_mail($_);

}
close(ADR);

sub sende_das_mail
{
my($currentadr) = shift;
#Rest der Senderoutine
}

================cut================

Naja, ist ja Geschmacksfrage, aber das mit dem 'chomp' ist schon wichtig.

Grüße
  Klaus