regex - Probleme! - #58177 (Allgemeines zu Perl)

vayu

2005-09-19 15:03

User since
2005-01-13
782 Artikel
BenutzerIn
[default_avatar]

Bis zu einem Wort ausgeben

Code: (dl )

1
2
3

if($satz =~ /^(.*)?WORT/) {
  print $1;
}

Ab einem Wort ausgeben

Code: (dl )

1
2
3

if($satz =~ /^.*?WORT(.*)$/) {
  print $1;
}

getestet :P\n\n