String abspalten: muss einen String aus einer Zeile trenne - #61539 (Allgemeines zu Perl)

sit

2006-01-07 01:02

User since
2005-12-30
8 Artikel
BenutzerIn
[default_avatar]

Hallo, nun ich bin gerade auf dem Holzweg

Code: (dl )

if($mech->content() =~ m{$leer(.*)"}) {
    print  $1\n;
    
}

nun dummer weise findet er die Stelle die in $leer steht, macht aber kein Ende bei den Anführungszeichen, sondern bringt mir den ganzen Inhalt ab dieser Stelle.... obwohl er eigentlich mehrere Zeilen bringen müsste....

hat einer eine Idee?

Edit by Dubu: korrekte Code-Tags\n\n