Ein Programm zum Testen von Mustern
Wenn Sie während Ihrer Perl-Laufbahn einmal einen regulären Ausdruck schreiben müssen, ist es nicht immer einfach vorauszusagen, was genau das Muster tut. Es ist ganz normal, wenn Sie feststellen, dass Ihr Muster beispielsweise auf mehr oder auf weniger passt, als Sie erwartet haben. Oder das Muster passt früher, als Sie dachten, oder später oder womöglich auch gar nicht.
Das folgende Programm ist hilfreich, um ein Muster mit einigen Strings auszuprobieren, damit Sie sehen, was gefunden wurde und wo:[241]
#!/usr/bin/perl while (<>) { # Benutzereingaben zeilenweise einlesen chomp; if (/IHR_MUSTER_STEHT_HIER/) { print "Treffer: |$`<$&>$'|\n"; # die automatischen Speichervariablen } else { print "Keine Treffer: |$_|\n"; ...Get Einführung in Perl, Sixth Edition now with the O’Reilly learning platform.
O’Reilly members experience books, live events, courses curated by job role, and more from O’Reilly and nearly 200 top publishers.
