Re: Perlprogramm Problem

8 Jun 2003


      Hallo,

[Nachtrag]

On Sun, 08 Jun 2003, David Haller wrote:
...
Folgende Moeglichkeiten hast du:
if(/^From: /) {
       my $var = "";
       unless (/\]+)/) {
               $var = $1;
           }
       }
       print $var;
   }
[und Varianten]
Wenn du evtl. Leerzeichen entfernen willst, dann muesste folgende
ungetestete(!) RE in allen Varianten funktionieren.

    /\<\s*([^>]+)\s*\>/

-dnh

-- 
Linux is like a teepee: No windows, no gates, an Apache inside.