Список без элементов обозначается как
Пример 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
Содержание раздела