Список без элементов обозначается как
Пример 11
@s1 = (1, 2, 3); # Первый список @s2 = (6, 7, 8); # Второй @s = (0, @s1, 4, 5, @s2, 9, 10); # Включаем списки @s1 и @s2 print @s; # Результат: 012345678910 - значения без пробелов. Список без элементов обозначается как () и называется нуль-списком. Списковое выражение можно употреблять как имя массива, но при этом его нужно брать в круглые скобки.
Пример 11
print qw/Построимся и спасемся!/; # ('Построимся','и','спасемся!') Результат:
Построимсяиспасемся! Часто применяется как:
use POSIX qw( setlocale localeconv ) @EXPORT = qw( proc1 var );
s/шаблон/подстрока/egimosx
Поиск по шаблону и в случае успеха замена подстрокой. Возвращает количество произведенных подстановок, иначе false (0). Если строка в которой ведется поиск не указана (операторы =~ или != ), то используется переменная $_ . Если в качестве разделителя '/' использовать одинарную кавычку ('), то интерполяции не будет, иначе можно применять переменные в шаблоне или подстроке.
Опции:
e | - Рассматривать правую часть как выражение. |
g | - Глобальный поиск. |
i | - Без различия регистра букв |
m | - многострочная переменная |
o | - компилировать шаблон один раз |
s | - однострочная переменная |
x | - расширенное регулярное выражение |
Пример 11
M1: while ($i < 6) { ++$i; # Увеличиваем счетчик на 1 redo M1 if $i == 3; # Далее пропустить для $i = 3 ++$i; # иначе увеличиваем счетчик еще раз на 1 } continue { print "$i "; # Печатаем $i } Результат: 2 5 7