Hallo, habe ein kleines Perl Programm (nicht selber geschrieben, von irgendeiner Webseite oder hier aus der Liste), welches die Absender Adresse aus einer Mail holt. Das klappt auch so weit, nur steht manchmal ein Leerzeichen davor. Damit klappt dann das Matching nicht mehr. Das Original sieht so aus: ,----[ getfromadress ]- | #!/usr/bin/perl -wn | # Picks out the actual address from the "From:" line | | unless (/\) { print; } else { print /<([^>]+)/, "\n"; } `---- Ich habe versucht es in folgendes umzubauen: ,----[ test ]- | #!/usr/bin/perl -wn | # Picks out the actual address from the "From:" line | | my($var) = ""; | | unless (/\) { $var .= $_; } else { $var .= /<([^>]+)/; } | | print $var; `---- Leider kommt da immer eine 1 raus. Da ich nicht viel mit Perl gemacht habe bin ich ein wenig aufgeschmissen. Vielleicht kann hier jemand helfen ? Ciao Sascha -- sa at programmers-world dot com http://www.livingit.de Boomarks online: http://www.mobile-bookmarks.info Soon available in english Mail geschrieben: Sonntag, den 08. Juni 2003 um 19:08