Скрипты языка Perl используют регулярные выражения для того, чтобы упростить сравнение строк. Для того чтобы проверить, содержит ли строка заданный образец, скрипт может использовать регулярные выражения следующим образом:
if ($str =~ /pattern/)
В данном случае регулярные выражения принимают значение «истинно», если образец найден в строке ($ str ). Если строка по содержит образца, то выражение возвращает значение «ложно». Например, следующее выражение проверяет, содержит ли строка текст W eb Programming :
if ($str =~ /Web Programming/)
Для того, чтобы проверить полное совпадение, выражение должно привязать сравнение к началу и концу строки. Например, следующее выражение имеет значением величину «истинно», если и только если переменная $ str принимает одно из трех значений: « banana », « bananana ») « banananana »:
($str =~ /^ba(na) {2,4}$/)
Аналогичным образом, следующее выражение истинно тогда и только тогда, когда переменная $str содержит слово « the » и не является частью другого слова, такого как « their ».
($str =~ /\bthe\b/)