Введение в Perl

http://lemon62.ru/moskva/remont, otdelka/cat_1_2140.html | what does my baby look like at 11 weeks Новые фильмы азиаток с данного сайта в хорошем качестве

Конструкторы и деструкторы


Seekdir директория позиция
seekdir директория, позиция Установить указатель файла в открытой директории для последующего чтения функцией readdir(). Текущая позиция может быть получена функцией telldir()....
Select файл select
select файлselect Возвращает текущий указатель файла- по умолчанию или делает текущим указанный. Таким образом, если в функциях print или write не указан файл вывода, то это осуществляется в файл...
Select RBITS WBITS EBITS TIMEOUT
select RBITS, WBITS, EBITS, TIMEOUT Выполняет системный select()...
Semctl ID SEMNUM CMD ARG
semctl ID, SEMNUM, CMD, ARG Системный вызов semctl() для SYSTEM V....
Semget KEY NSEMS FLAGS
semget KEY, NSEMS, FLAGS Системный вызов semget() для SYSTEM V....
Semop KEY OPSTRING
semop KEY, OPSTRING Системный вызов semop() для SYSTEM V....
Send SOCKET MSG FLAGS TO send SOCKET MSG FLAGS
send SOCKET, MSG, FLAGS, TOsend SOCKET, MSG, FLAGS Послать сообщение через сокет. Аналогично системному send()....
Setpgrp PID PGRP
setpgrp PID, PGRP Установить номер группы PGRP процессу с номером PID, 0 - для текущего процесса....
Setpriority WHICH WHO PRIORITY
setpriority WHICH, WHO, PRIORITY Установить приоритет PRIORITY процессу пользователя WHO и группе WHICH....
Setsockopt SOCKET LEVEL OPTNAME OPTVAL
setsockopt SOCKET, LEVEL, OPTNAME, OPTVAL Установить параметры сокета. Возвращает неопределенность при ошибке....
Shift массив shift
shift массивshift Удаляет первый элемент массива и возвращает его значение. Если массив пустой, то результат - неопределенность. Если аргумент опущен - обрабатывается массив @ARGV в головной прог...
Shmctl ID CMD ARG
shmctl ID, CMD, ARG Системный вызов shmctl() System V...
Shmget KEY SIZE FLAGS
shmget KEY, SIZE, FLAGS Системный вызов shmget() System V...
Shmread ID VAR POS SIZE shmread ID STRING POS SIZE
shmread ID, VAR, POS, SIZEshmread ID, STRING, POS, SIZE Пишет или читает сегмент общедоступной памяти в System V....
Shutdown SOCKET HOW
shutdown SOCKET, HOW Прекращает работу сокета методом HOW....
Sin выражение
sin выражение Возвращает в радианах синус выражения....
Sleep выражение sleep
sleep выражениеsleep Приостанавливает работу процесса на указанное число секунд или зацикливается, если аргумент отсутствует. Работа продолжается, если получен сигнал SIGALARM. Возвращает время ф...
Socket SOCKET DOMAIN TYPE PROTOCOL
socket SOCKET, DOMAIN, TYPE, PROTOCOL Открывает сокет и привязывает его к указателю SOCKET....
Socketpair SOCKET1 SOCKET2 DOMAIN TYPE PROTOCOL
socketpair SOCKET1, SOCKET2, DOMAIN, TYPE, PROTOCOL Создает "безымянную" пару сокетов в указанном DOMAIN. Возвращает true при успехе и false - неудаче....
Sort подпрограмма список sort блок список sort список
sort подпрограмма списокsort блок списокsort список Сортирует элементы списка и возвращает полученный список. Несуществующие элементы списка отбрасываются. Если не указано имя подпрограммы или бл...
Splice массив смещение длина список
splice массив, смещение, длина, списокsplice массив, смещение, длинаsplice массив, смещение Удаляет элементы массива, начиная со смещения и указанной длины. Заменяет их указанным списком. Возвращ...
Split /шаблон/ выражение предел
split /шаблон/, выражение, пределsplit /шаблон/, выражениеsplit /шаблон/split Разделяет строку, указанную выражением, на массив элементов и возвращает его. В скалярном контексте возвращает количе...
Пример 5
Пример 5 ($a, $b, $остаток) = split(/ /, "Один Два Три Четыре",3); здесь $a = 'Один', $b = 'Два' и $остаток = 'Три Четыре' Если шаблон содержит круглые скобки, то символы-разделител...
Пример 6
Пример 6 @a = split(/([,.])/, "Один,Два.Три"); здесь @a = ("Один", "," ,"Два", ".", "Три")...
Sprintf формат список
sprintf формат, список Форматирует список по указанному формату аналогично функции sprintf() языка С....
Sqrt выражение
sqrt выражение Возвращает корень квадратный выражения....
Srand выражение
srand выражение Задает начальное значение для генератора случайных чисел - оператора rand. Если аргумент отсутствует, то используется текущее машинное время....
Stat файл stat выражение
stat файлstat выражение Возвращает 13 элементный массив параметров указанного файла или пустой список при ошибке. Применяется обычно следующим образом: ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev...
Study скаляр study
study скалярstudy Включение метода частотного сравнения. Целесообразность применения зависит от количества поисков и количества констант в строке в которой ведется поиск. Функция работает следующ...
Substr выражение смещение длина substr выражение смещение
substr выражение, смещение, длинаsubstr выражение, смещение Возвращает подстроку выражения, начиная со смещения и заданной длины. Если смещение отрицательное, то отсчет ведется от конца строки. Е...
Symlink старый_файл новый_файл
symlink старый_файл, новый_файл Создает новый файл, символически связанный со старым, т.е. создает ссылку на файл. Возвращает 1 при успехе и 0 - неудаче....
Syscall список
syscall список Выполняет системную функцию. Первый элемент списка - это имя функции, а остальные элементы - ее аргументы. Если функция не выполнима, то возвращается фатальная ошибка. Аргументы ин...
Sysread файл скаляр длина смещение sysread файл скаляр длина
sysread файл, скаляр, длина, смещениеsysread файл, скаляр, длина Прочитать из файла указанное число байт в скаляр с помощью системного вызова read(). Смещение обозначает позицию в скаляре, после...
System список
system список Делает то же самое, что и "exec список" с той лишь разницей, что вызов fork() делается первым, и родительский процесс ждет завершения потомка. Возвращает значение аналогич...
Syswrite файл скаляр длина смещение
syswrite файл, скаляр, длина, смещениеsyswrite файл, скаляр, длина Записать в файл указанное число байт скаляра с помощью системного вызова write(). Смещение указывает позицию в скаляре, откуда н...
Tell файл tell
tell файлtell Возвращает текущую позицию указателя в открытом файле. Если файл не указан, то последнего читаемого файла....
Telldir директория
telldir директория Возвращает текущую позицию указателя в открытой директории. Обычно это параметр для позиционирования указателя директории функцией seekdir()....
Tie переменная класс список
tie переменная, класс, список Присваивает переменную классу. Список - это аргументы new метода класса (TIESCALAR, TIEARRAY или TIEHASH). Возвращает указатель на созданный новый объект класса, ко...
Time
time Возвращает количество секунд, начиная с 1 января 1970 г 00:00:00 UTC. Годы не разделяются на високосные....
Times
times Возвращает 4-х элементный массив значений: ($user, $system, $cuser, $csystem) = times; где: $user - пользовательское время процесса в секундах. $system - системное время...
Tr///
tr/// Оператор транслятор. Подробно смотри главу "Операторы"....
Truncate файл длина truncate выражение длина
truncate файл, длинаtruncate выражение, длина Усекает длину указанного файла....
Uc выражение
uc выражение Возвращает строку выражения, в которой малые буквы заменены на заглавные....
Ucfirst выражение
ucfirst выражение Возвращает строку выражения, в которой первая буква заменена на заглавную....
Umask выражение umask
umask выражениеumask Устанавливает маску umask и возвращает старое значение. Без аргумента возвращает текущее значение....
Undef выражение undef
undef выражение undef Делает неопределенным значение выражения. Применяется только для скалярных переменных, целых массивов или подпрограмм. Всегда возвращает неопределенное значение....
Unlink список
unlink список Удаляет файлы, указанные в списке. Возвращает количество удаленных файлов. Только супервизор может удалять директории с файлами, если Perl запущен с ключом -U....
Unpack шаблон выражение
unpack шаблон, выражение Функция, обратная pack(). Распаковывает строку выражения по указанному шаблону в массив значений. В скалярном контексте возвращает значение только первого элемента. Шабло...
Untie переменная
untie переменная Исключает переменную из класса указанного tie()....
Unshift массив список
unshift массив, список Противоположное shift. Помещает элементы списка в начало массива....
Use модуль список use модуль
use модуль списокuse модуль Указывает библиотечный модуль, из которого можно вызывать подпрограммы. Список перечисляет имена подпрограмм, которые добавляются к текущей области имен. Если не указа...
Utime список
utime список Изменяет дату обращения и модификации файлов из списка. Первые два элемента списка должны указывать новое значение даты обращения и модификации. Возвращает количество измененных файл...
Values хеш
values хеш Возвращает обычный массив со всеми значениями хеша. В скалярном контексте возвращает количество значений хеша....
Vec выражение смещение бит
vec выражение, смещение, бит Возвращает значение строки как вектор беззнаковых целых....
Wait
wait Ожидать окончание порожденного процесса. Возвращает PID для родительского процесса или -1, если нет - процесса потомка. Код завершения записывается в переменную $?....
Waitpid PID FLAGS
waitpid PID, FLAGS Ожидать окончания процесса потомка с указанным PID. Возвращает либо PID этого процесса либо -1 если нет такого процесса. Код завершения записывается в переменную $?....
Wantarray
wantarray Возвращает true, если подпрограмма вызывается в списковом контексте и false - в скалярном....
Warn список
warn список Выводит в стандартный поток ошибок STDERR сообщение аналогично die(), но не прекращает работу программы....
Write файл write выражение write
write файлwrite выражениеwrite Выводит в файл форматированные данные по оператору format. По умолчанию имя формата совпадает с именем указателя файла. Имя файла по умолчанию можно изменить функци...
Y///
y/// Оператор транслятор. Смотри главу Операторы....
Введение в Perl
Введение в Perl В книге приводятся начальные сведения по новому языку программирования Perl. Данный язык получил широкое распространение в связи с развитием компьютерной сети Интернет. Все примеры...
Интернет ссылки и литература
Интернет - ссылки и литература. Очень полезные USENET конференции: comp.lang.perl.announce - Различные объявления и сообщения. comp.lang.perl.misc - Место для вопросов и обсуждений....
Модули (packages)
Модули (packages). Таблицы имен Конструкторы и деструкторы Классы Создание библиотеки Pragma библиотеки Стандартные библиотеки CPAN В Perl реализован механизм модулей. Модуль э...
Таблицы имен
Таблицы имен. Все имена модуля хранятся в ассоциативном массиве (хеше) с именем модуля, к которому добавлены символы "::". Таким образом имена головного модуля хранятся в %main:: , мод...
Конструкторы и деструкторы
Конструкторы и деструкторы. Конструктор - это подпрограмма, которая выполняется в момент создания объекта, а деструктор - удаления объекта. Для модуля это подпрограммы с именами BEGIN и END. При...
Классы
Классы. В Perl нет специального синтаксиса для классов. Но функционально полноценными классами могут быть модули. При этом подпрограммы модуля становятся методами, а с помощью массива @ISA можно...
Создание библиотеки
Создание библиотеки. Если вы хотите создать модуль отдельным файлом и использовать как библиотеку подпрограмм, при этом вызывать подпрограммы библиотеки, не указывая имени модуля, вам необходимо...
Pragma библиотеки
Pragma библиотеки. Данные библиотеки используют как: use имя; когда хотят включить действие и no имя; когда выключить. В стандартный набор входят следующие pragma: diagnosticsВключить...
Стандартные библиотеки
Стандартные библиотеки. AnyDBM_File Возможность работы с разными типами баз данных. AutoLoader Загрузка в память функций только во время вызова. AutoSplit Разделить модуль для автозагрузки. B...
CPAN
CPAN Программисты всего мира, работающие с Perl, создали общедоступную библиотеку модулей CPAN. Она доступна через Интернет и содержит огромное количество различных по назначению модулей. К ним...
Операторы и приоритеты
Операторы и приоритеты. Термы и левосторонние списковые операторы Унарные операторы Операторы "привязки" =~ и != Мультипликативные операторы Аддитивные операторы...
Термы и левосторонние списковые операторы
Термы и левосторонние списковые операторы. Любой терм имеет самый высокий приоритет. К терму относятся переменные, кавычки и их операторы, арифметические и логические выражения в скобках, любые ф...
Пример 1
Пример 1 print ++($i = "09"); # Результат "10" print ++($i = "a9"); # "b0" print ++($i = "az"); # "ba" print ++($i = &q...
Пример 2
Пример 2 print 4**2 # Результат 16 print -4**2 # Результат -16 т.е. -(4**2)...
Унарные операторы
Унарные операторы. '!' - логическое отрицание '-' - арифметический минус '~' - побитная инверсия (дополнение до 1) '+' - арифметический пл...
Операторы "привязки" =~ и !=
Операторы "привязки" =~ и != . Эти "необычные", я бы даже сказал, оригинальные операторы имеют очень широкое применение в Perl. Можно даже назвать их "оригинальным"...
Мультипликативные операторы
Мультипликативные операторы. '*' - арифметическое умножение '/' - арифметическое деление '%' - арифметический модуль 'x' - оператор повто...
Пример 3
Пример 3 print '*' x 5; # Результат '*****' print (1,2) x 3; # Результат 121212...
Аддитивные операторы
Аддитивные операторы. '+' - арифметический плюс '-' - арифметический минус '.' - конкатенация (объединение) строк...
Операторы сдвига
Операторы сдвига. '<<' - Сдвигает побитно влево значение выражения в левой части на количество бит указанное в правой. '>>' - Сдвигает побит...
Именованные унарные операторы
Именованные унарные операторы. Фактически это функции с одним аргументом. Круглые скобки можно опускать....
Операторы отношений
Операторы отношений. '<' - арифметическое меньше '>' - арифметическое больше '<=' - арифметическое меньше или равно '>=' - арифме...
Операторы равенства
Операторы равенства. '==' результат true если левая часть равна правой (равно) '!=' - не равно '<=>' - -1 если левая часть меньше правой, 0 если ра...
Операторы работы с битами
Операторы работы с битами. '&' - побитное AND '|' - побитное OR '^' - побитное XOR...
Логические операторы && (AND) и || (OR)
Логические операторы && (AND) и || (OR). '&&' - если левое выражение возвращает false, правое не выполняется. '||' - если левое выражение возвращае...
Оператор диапазона ' '
Оператор диапазона '..' Результат работы данного оператора зависит от контекста. В списковом контексте результат есть список с элементами, первый элемент которого это левое выражение и последнее...
Пример 4
Пример 4 for $i (1..4) { print "$i "; } Результат: 1 2 3 4 В скалярном контексте результат - логическое значение. Каждая '..' операция устанавливает свое собственное состоян...
Пример 5
Пример 5 @алфавит = ('a'..'z'); # Массив малых букв латинского алфавита @цифры = (0..9); # Массив цифр...
Условный оператор '? '
Условный оператор '?:' Этот оператор работает так же как и в С. Если выражение перед '?' истинно, то выполняется аргумент перед ':' - иначе после ':'....
Пример 6
Пример 6 $i = 1; $i > 1 ? print "больше" : print "меньше"; Результат: меньше...
Операторы присваивания
Операторы присваивания. '=' - обычный оператор "присвоить" правое значение переменной слева Вся эта группа операторов подобна операторам С, т.е. $i += 2; эквивал...
Оператор ' ' (запятая)
Оператор ',' (запятая) В скалярном контексте выполняется левый аргумент, результат игнорируется, затем правый и его результат есть результат действия оператора. В списковом контексте это раздели...
Операторы not and or xor
Операторы not, and, or, xor Оператор логическое not (отрицание).Унарный not возвращает противоположное значение, полученное выражением справа. Он эквивалентен '!', но имеет очень низкий приоритет...
Операторы ограничители строк
Операторы ограничители строк. Обычно ограничителями строк мы считаем литералы, но в Perl это операторы выполняющие разного рода интерполяцию и поиск по шаблону. Вы можете сами задавать удобные д...
?PATERN?
?PATERN? Действие этого оператора аналогично /шаблон/, но выполняется до первого совпадения. Это удобно для поиска наличия какой-нибудь строки в одном или множестве файлов. Это не очень удачный...
Пример 7
Пример 7 $a = "/usr/local/perl/perl.bin"; # Анализируемая строка Цель: Создать массив @dirs с именами директорий. Решение: Самый простой способ воспользоваться split('\/') но в качес...
Пример 8
Пример 8 print q#Привет.#; # Результат Привет. print 'O\'K'; # O'K qq/строка/"строка" Интерполируемая строка....
Пример 9
Пример 9 $var = 13; print "\$var = $var"; Результат: $var = 13 qx/строка/`строка` Сначала строка интерполируется, а потом выполняется как системная команда....
Пример 10
Пример 10 print `date`; Результат: Thu Nov 14 13:36:49 MSK 1996 qw/строка/ Возвращает список, элементы которого - слова строки, разделенные пробелами....
Пример 11
Пример 11 print qw/Построимся и спасемся!/; # ('Построимся','и','спасемся!') Результат: Построимсяиспасемся! Часто применяется как: use POSIX qw( setlocale localeconv ) @EXPORT = qw(...
Пример 12
Пример 12 $var = "12345"; # исходная строка $var =~ s/1/0/; # Заменить '1' на '0'. Результат 02345 $var =~ s(5)(.); # Заменить '5' на '.' Результат 0234. Здесь в качестве раздели...
Пример 13
Пример 13 $s = "hello"; # Исходная строка $s =~ tr/a-z/A-Z/; # Заменить малые буквы на большие. Результат # 'HELLO' $s = 'Hel....lo'; $s =~ tr/a-zA-z/_/c; # За...
Операторы вводавывода
Операторы ввода-вывода. В Perl существует несколько операторов ввода-вывода. Первый это скобки из символа '`' - акцента. Строка в этих скобках воспринимается как системная команда и результат ее...
Пример 14
Пример 14 while(<>) { print; }; # Прочитать и вывести весь файл STDIN У оператора '<>' есть одна отличительная особенность. Если в командной строке нет никаких аргументов, то читае...
Пример 15
Пример 15 while(<*.pl>) { print;}; # То же что и ls *.pl @files = <*>; # Массив @files содержит имена файлов в директории но лучше сделать: @files = glob("*"); т.к....
Слияние констант
Слияние констант. Как и С Perl выполняет возможные вычисления в период компиляции. Так подстановка символов после '\' , операция конкатенации строк, арифметические выражения, содержащие только од...
Целочисленная арифметика
Целочисленная арифметика. По умолчанию Perl выполняет арифметику с плавающей запятой, но если вы укажете: use integer; то компилятор будет использовать целочисленную арифметику до конца тек...
Регулярные выражения (шаблоны)
Регулярные выражения (шаблоны). В данной главе описывается синтаксис регулярных выражений. Чаще всего в Perl они используются в операторах поиска и замены таких как s//, m/, операторах связки =~ил...
Пример 1
Пример 1 $s = "Один 1 два 2 и три 3"; if ($s =~ /(\d+)\D+(\d+)/) { print "$1\n";# Результат '1' print "$2\n";# '2' print "$+\n";# '2' prin...
Пример 2
Пример 2 $s = "1+2-3*4"; if ($s =~ /(\d)(?=-)/) # Найти цифру за которой стоит '-' { print "$1\n"; # Результат '2' } else { print "ошибка поиска\n";} (?!ш...
Пример 3
Пример 3 $s = "1+2-3*4"; if ($s =~ /(\d)(?!\+)/) # Найти цифру за которой не стоит '+' { print "$1\n"; # Результат '2' } else { print "ошибка поиска\n";} (?i...
Запуск интерпретатора Perl
Запуск интерпретатора Perl Синтаксис: perl [ключи] файл аргументы Перед стартом Perl ищет скрипт (программу) в следующем порядке: В командной строке если указан ключ '-e' Содержимое ф...
Подпрограммы
Подпрограммы. Private переменные Переменные типа local Прототипы (prototypes) Ссылка как параметр Переопределение встроенных функций Автозагрузка Для применения подпрограммы ее не...
Private переменные
Private переменные. Для применения переменных доступных только внутри блока или подпрограммы необходимо определить их с помощью функции my(список).Если переменная одна, то скобки можно опустить....
Пример 1
Пример 1 # Программа вычисления факториала. print fact(3); # вычислить факториал 3*2*1 sub fact # Определяем подпрограмму. { my $m; # private переменная но не local ! $m = $_[0]; retu...
Переменные типа local
Переменные типа local. В общем лучше использовать private переменные, т. к. это надежней и быстрее. private переменные обеспечивают лексическую область применения (видимости), а local - динамиче...
Прототипы (prototypes)
Прототипы (prototypes). Для краткого описания типа передаваемых подпрограмме параметров можно применять прототипы. В Perl существуют следующие прототипы: Декларация...
Пример 2
Пример 2...
Переопределение встроенных функций
Переопределение встроенных функций. Большинство встроенных функций Perl можно переопределить своими собственными. Обычно это делают для удобства совместимости Perl для разных платформ систем.Для...
Автозагрузка
Автозагрузка. Если вы попытаетесь вызвать несуществующую функцию, то Perl немедленно выдаст сообщение об ошибке. Но если вы определите подпрограмму с именем 'AUTOLOAD', то она будет вызвана с те...
Синтаксис
Синтаксис. Декларации (объявления) Простое предложение Сложные предложения Циклы while Операторы управления циклом next last redo...
Декларации (объявления)
Декларации (объявления). Perl имеет свободный формат. Комментарии начинаются с символа '#' и продолжаются до конца строки. Декларации могут использоваться в любом месте программы так же как и пре...
Пример 1
Пример 1 sub test; # Декларация подпрограммы test $var1 = test $0; # Использование как оператора списка. Декларации подпрограмм могут быть загружены из отдельного файла предложением require или...
Простое предложение
Простое предложение. Простое предложение обязательно заканчивается символом ';' если только это не последнее предложение в блоке где ';' можно опустить. Заметьте, что существуют операторы такие к...
Пример 2
Пример 2 $var = 1; $var2 = 3 if $var > 0; # Результат: $var2 = 3 while EXPR - Модификатор "пока". Предложение выполняется пока EXPR = true...
Пример 3
Пример 3 $var = 1; print $var++ while $var < 5; # Печать $var с инкрементом Результат: 1234 until EXPR- Модификатор "до ". Предложение выполняется до тех пор пока EXPR = false...
Пример 4
Пример 4 $var = 1; print $var++ until $var > 5; # Печать $var с инкрементом Результат: 12345 unless EXPR - Модификатор "если не" . Обратный к if. Выражение выполняется если EXPR =...
Пример 5
Пример 5 $var = 1; print $var++ unless $var > 5; # Печать $var с инкрементом Результат: 1...
Сложные предложения
Сложные предложения. Последовательность простых предложений, ограниченная функциональными ограничителями, называется блоком. В Perl это может быть целый файл, последовательность предложений в опе...
If (EXPR) BLOCK Вычисляется логическое
if (EXPR) BLOCK - Вычисляется логическое выражение EXPR и если true блок выполняется....
Операторы управления циклом
Операторы управления циклом....
Next подобен continue в С Переходит
next - подобен continue в С. Переходит к началу текущего цикла т.е. повторяет итерацию....
Пример 9
Пример 9 M1: while ($i < 6) { ++$i; # Увеличиваем счетчик на 1 next M1 if $i < 3; # Переходим в начало если $i < 3 ++$i; # иначе увеличиваем счетчик еще раз на 1 } conti...
Last подобен оператору break в
last - подобен оператору break в языке С. Немедленно прерывает цикл. Блок continue пропускается....
Пример 10
Пример 10 M1: while ($i < 6) { ++$i; # Увеличиваем счетчик на 1 last M1 if $i > 3; # Выход из цикла если $i > 3 ++$i; # иначе увеличиваем счетчик еще...
Redo начать новый цикл не вычисляя
redo - начать новый цикл не вычисляя EXPR и не выполняя continue блок....
Пример 11
Пример 11 M1: while ($i < 6) { ++$i; # Увеличиваем счетчик на 1 redo M1 if $i == 3; # Далее пропустить для $i = 3 ++$i; # иначе увеличиваем счетчик еще раз...
Цикл for
Цикл for. LABEL for (EXPR1; EXPR2; EXPR3) BLOCKОператор for полностью аналогичен оператору for в С. В перед началом цикла выполняется EXPR1, если EXPR2 = true выполняется блок, затем выполняется...
Пример 12
Пример 12 for ($i = 2; $i < 5; ++$i) { print $i, " "; } print "\nПосле цикла i = $i\n"; Результат: 2 3 4 После цикла i = 5...
Цикл foreach
Цикл foreach. LABEL foreach VAR (LIST) BLOCKПеременной VAR присваивается поочередно каждый элемент списка LIST и выполняется блок. Если VAR опущено, то элементы присваиваются встроенной переменн...
Пример 13
Пример 13 @месяц = ("январь","февраль","март"); # Создали массив foreach $i (@месяц) { print $i," "; # Печать $i } Результат:...
Пример 14
Пример 14 @месяц = ("январь","февраль","март"); # Создали массив foreach $i (@месяц) { $i = uc($i); # Перевели в верхний регистр } print...
Пример 15
Пример 15 for $i (3,5,7) { print "$i "; } Результат: 3 5 7...
Блоки и оператор switch
Блоки и оператор switch. Блок не зависимо от того имеет он метку или нет семантически представляет собой цикл который выполняется один раз. Поэтому действие операторов цикла next, last, redo - ан...
Оператор goto
Оператор goto. В Perl существует оператор goto хотя где , как и когда его применять как говорил Ходжа Насреддин "Тонкий философский вопрос". Для начинающих программистов которым от так...
POD операторы Документирование программ
POD операторы. Документирование программ. В Perl реализован очень удобный механизм для написания документации в момент создания программы. Для этого применяются специальные POD операторы. Если в...
Встроенные переменные Perl
Встроенные переменные Perl. Описанные в данной главе переменные имеют в Perl специальные значения. Они обозначаются несколько непривычно для "глаза" программистов, т.к. состоят обычно то...


Начало



Книжный магазин