oder (PERL) RegExp für Strings der \" überspringt gesucht

[Ed X]

Hi,

Ich suche einen Regulären Ausdruck der mir aus einem Quellcode einen
String zurückliefert, als etwas was wie

print "Dies ist eine Textzeile";

dagegen hilft /".*"/

Wenn der Text aber so aussieht:

print "Dies ist "eine" Textzeile";

habe ich damit ein Problem!! Wie kann ich den RegExp überreden, die
<denglish>escapten quotes</denglish> zu ignorieren?

es muss nicht multilinefähig sein (da JAVA-Quellcode!)

bye eddie