Hey,
pass mal auf, ich schreibe den Beitrag vom Großelter noch ein bisschen ausführlicher und ich ich hoffe, dass bei dir dann der Groschen fällt.
> > $text=~s/;.+?\?//;
$text =~
s/ # ersetze
; # ein Semikolon
.+ # ein oder mehrere Zeichen...
? # ... aber optional
\? # und ein Fragezeichen
// # durch nichts
x; # = explanation ;)
Alles klar jetzt? Wenn nicht, musst du mal Doku wälzen gehen.
http://perldoc.perl.org/perlretut.html
http://de.selfhtml.org/perl/sprache/regexpr.htm
--
水-金-地-火-木-土-天-海-冥
水-金-地-火-木-土-天-海-冥