Шаблоны и все что с ними связанно

Оператор =~ и !=.

Пример:

$var =~ /w+/

Найденный результат заносится в переменную типа $цифра, надо сказать что в эту переменную заносятся выражения попадающие под шаблон в круглых скобках. К примеру, можно написать такую программу:

$var = "Hello world!!!!";
$var =~ /Hello (w+)/;
printf "Результат: $1
";

 Результат: world

Пример:

$_ = "Hello world!!!!";
/Hello (w+)/;
printf "Результат: $1
";

Оператор поиска

Синтаксис:

   m/шаблон/параметр

Хотя вы могли заметить из предыдущих примеров, что параметр можно не использовать, также можно не использовать m, а просто заключить шаблон между обратными бэкслэшами (деление). Как уже было сказано выше, результат поиска заносится в переменную типа $цифра.

Пример:

$var = "Hello world!!!!";
$var =~ /(w+)(w+)/;
printf "Результат: $1 $2
";

  Результат: Hello world

if ( $var =~ /+w/ )
{  print "Найдено!!!
"; }
else
{ print "Найдено!!!
"; }

Шаблоны

Шаблон не был бы шаблоном, если бы не метасимволы - символы обозначающие группы других символов. Имеются следующие метасимволы.

	Отменяет действие следующего за ним метасимвола и считает его как обычный символ
()	Группировка.
.	Один произвольный символ. Кроме ' ' - конец строки.
$	Конец строки
|	Альтернатива
^	Начало строки
[]	Множество символов.

Рассмотрим для примера, метасимвол '()' - стоит оговорится, что при поиске, результат выражения будет содержаться именно в круглых скобках.

/Hello (w+)/;

Имеются следующие модификаторы:

*	Повторяется 0 или большее число раз
+	-//- 1 или большее число раз
?	1 или 0 раз
{n}	точно n раз
{n,m}	не меньше n, но и не больше m

Как можно заметить, что все выражение 'w+', можно подставить в место любого слова (повторение буквенных символов и есть слово), то есть, имеется возможность сделать собственные универсальные шаблоны.

Для полного понятия рассмотрим еще несколько дополнительных метасимволов:

w	Алфавитно-цифровой или '_' символ
W	не -//-
s	один пробел
S	один не пробел
D	одна не цифра
d	одна цифра
	Граница слова
B	не граница слова
A	начало строки
	конец начало строки
G	конец действия m//g

Оператор замены

  s/шаблон/подстановка/параметр

$var =~ s/привет/hello/;

var =~ s/привет w+/hello/;

В случае удачного успешного завершения операции возвращается количество замен, а если ничего найти не удалось тогда false или 0.

Оператор замены tr.

  tr/таблица1/ таблица2/параметры

Имеет следующие параметры:

c	Дополнение 'таблица1', то есть заменяются те символы, которые не стоят в 'таблица1', немного похожа на операцию NOT
d	Cтереть найденные, но не замененные символы
s	"сжать" повторяющиеся замененные символы, то есть если после замены в подряд идут несколько одинаковых символов, то они сжимаются в один.

Пример:

  $ var = "Hello All";
  $ var =~ tr/l/L/;
  print "$var
";

  HeLLo ALL.