Noch eine Frage zu Regulären Ausdrücken - #128666 (Allgemeines zu Perl)

bianca

2009-11-27 18:29

User since
2009-09-13
7016 Artikel
BenutzerIn

user image

Code (perl): (dl )

1
2

if (";$pruefwert;" =~ /\;$suchstring\;/i) {
}

Edit: i hinzugefügt für ignore case
Edit 2: Vor dem Regex ein

Code (perl): (dl )

$suchstring = quotemeta $suchstring;

verhindert falsche Ergebnisse, wenn $suchstring "gefährliche" Zeichen enthält.
Last edited: 2009-11-27 18:39:19 +0100 (CET)

10 print "Hallo"
20 goto 10