Михаил Шохирев - Язык программирования Perl
- Название:Язык программирования Perl
- Автор:
- Жанр:
- Издательство:Интернет-университет информационных технологий - ИНТУИТ.ру
- Год:2006
- Город:M.
- ISBN:5-94774-604-2
- Рейтинг:
- Избранное:Добавить в избранное
-
Отзывы:
-
Ваша оценка:
Михаил Шохирев - Язык программирования Perl краткое содержание
Курс знакомит с языком программирования Perl, с его принципами, основными возможностями и особенностями в объёме, достаточном, чтобы начать разрабатывать прикладные и системные задачи, включая программирование для сети Интернет.
Расчитанный на полугодовое изучение, курс является достаточно подробным введением в язык программирования Perl. Описывается уникальная культура Perl и особенности, отличающие его от других языков программирования и во многом обусловившие его популярность. Рассматриваются основные средства программирования на языке Perl версии 5.8. Разбираются богатые возможности языка для создания самых разных приложений, а также особый стиль программирования на Perl. Курс ориентирован на студентов, начинающих программистов или разработчиков, применяющих другие языки и желающих писать прикладные или системные программы на Perl.
Язык программирования Perl - читать онлайн бесплатно полную версию (весь текст целиком)
Интервал:
Закладка:
Конечно же, в Perl, как и в других языках программирования, есть традиционные арифметические операции:
* умножение (например, 2 * 2 будет 4) / деление (например, 11 / 2 будет 5.5) + сложение (например, 111 + "999" будет 1110) - вычитание (например, '26' - 1 будет 25)
Обратите внимание на особенность арифметических операций в Perl - в них могут участвовать и строки. При этом, попадая в числовой контекст, строковое представление числа автоматически преобразуется к соответствующему числовому значению. Это очень удобно, но нужно быть внимательным при преобразовании к числам строк, содержащих не-цифровые символы. Символ, не применяемый для записи десятичного числа, прерывает преобразование строки в число, например:
' +.25x7' + 1 будет 1.25 (то есть ' +0.25' + 1 или 0.25 + 1) 'x.25+7' + 1 будет 1 (то есть '' + 1 или 0 + 1) '10_000' + 1 будет 11 (то есть '10' + 1 или 10 + 1)
В Perl есть еще две очень удобные арифметические операции, которые имеются не во всех языках программирования:
** возведение в степень (например, 2 ** 5 будет 32) % деление по модулю или остаток от деления (например, 11 % 3 будет 2)
Из языка программирования C заимствованы операции увеличения и уменьшения на единицу, или автоинкремента и автодекремента соответственно. В отличие от перечисленных выше бинарных операций, имеющих два операнда, это унарные операции с одним операндом, применяемые к переменным. Эти операции изменяют значение своего операнда, чем отличаются от большинства других операций, не изменяющих значения операндов. Они могут записываться как в префиксной форме, когда знак операции стоит перед именем переменной, так и в постфиксной форме (также называемой суффиксной), когда знак операции стоит после переменной:
++ автоинкремент или увеличение на 1 (например, $n++ или ++$n) -- автодекремент или уменьшение на 1 (например, $n-- или --$n)
В префиксной форме значением выражения будет значение операнда после изменения, а в постфиксной - значение операнда до изменения. Особенности применения префиксной и постфиксной форм можно показать на таком простом примере:
$n = 25; # начальное значение переменной $n $x1 = $n++; # в $x1 сохранено 25, затем в $n стало 26 $x2 = ++$n; # в $n стало 27 и оно сохранено в $x2 $x3 = --$n; # в $n стало 26 и оно сохранено в $x3 $x4 = $n--; # в $x4 сохранено 26, затем в $n стало 25 --$n; # и наконец $n уменьшилось до 24
Хотя выражение с операцией автоинкремента или автодекремента возвращает значение, часто оно отбрасывается, а сама операция применяется только для изменения значения переменной, что является побочным эффектом ее выполнения. Например:
++$done_count; # увеличиваем счетчик обработанных строк $left_count--; # уменьшаем счетчик оставшихся строк
В отличие от других языков, в Perl эти операции могут применяться не только к целочисленным, но и к дробным значениям переменных:
$f = 2.5; # начальное значение переменной $f $f++; # теперь в $f стало 3.5
Операции автоинкремента и автодекремента более естественны, чем используемые в других языках эквивалентные выражения наподобие $n = $n + 1 (которые так шокируют математиков). К тому же они обычно и более эффективно реализованы.
В Perl есть операции унарный минус и унарный плюс, применяемые к числовым и строковым значениям. Например, если в переменной $n содержится число, в $s - строка, а в $x - любое значение, то унарные знаки подействуют так:
- унарный минус ($n = -$n; сменит знак числа в $n на противоположный) - унарный минус ($s = -$s; добавит перед строкой в $s символ '-') + унарный плюс ($x = +$x; не изменит значения любой переменной)
Поскольку унарный плюс не изменяет значения выражения, он может применяться в ситуации, когда синтаксис требует наличия разделителя, а пробел использовать нежелательно. Например, при указании выражения для вычисления Рerl в командной строке.
К унарным операциям также относится операция вызова функции. Многие встроенные функции языка Perl, которые будут рассмотрены в последующих лекциях, в действительности являются именованными унарными операциями. Они могут записываться в традиционном для функций виде с круглыми скобками или как унарные операции без скобок: sin($x) или sin $x. В таблице 3.1приведены математические функции и встроенные функции работы со временем.
Таблица 3.1.Функция | Описание | Пример использования | Результат (округленный) |
---|---|---|---|
abs $x | абсолютное значение $x | abs -25 | 25 |
atan2 $y, $x | арктангенс y/x в интервале от -р до + р | atan2 25,5 | 1.37340077 |
cos $x | косинус $x | cos 25 | 0.99120281 |
exp $x | возвращает e в степени $x | exp 0.25 | 1.28402542 |
int $x | целая часть от $x | int 25.25 | 25 |
log $x | натуральный логарифм $x | log 25 | 3.21887582 |
rand | случайное дробное число от 0 до 1 | rand | 0.97265625 |
rand $x | случайное число от 0 до $x | rand 25 | 23.0430603 |
srand | начинает новую случайную последовательность для rand | srand | 1 |
sin $x | синус $x | sin 25 | -0.1323518 |
sqrt $x | квадратный корень из $x | sqrt 25 | 5 |
time | число секунд с начала отсчета (обычно с 01.01.1970) | time | 1139738006 |
localtime | текущая или указанная дата и время | localtime | Sun Feb 12 14:55:25 2006 |
Наверное, одной из самых популярных встроенных функций можно назвать функцию print, выводящую список своих операндов в стандартный поток вывода (обычно на консоль), например:
print "Версия Perl=$]"; # вывести номер версии Perl print 2474.918 / 381.65; # печатать частное от деления print "Укажите количество чисел: "; # напечатать запрос
Подробно об операциях ввода-вывода будет рассказано в лекции 9, где также будут изучены операции проверки файлов - другая разновидность именованных операций.
В Perl нет специальных литералов для обозначения истинного и ложного значения, подобно true и false в других языках программирования. Необходимость вычислить истинность или ложность выражения определяется логическим контекстом. Логический (или булев) контекст является разновидностью скалярного строкового, поэтому значение выражения преобразуется к строке. Если после преобразования выражения получается пустая строка (не содержащая ни одного символа) либо строка, состоящая из одного символа '0' (цифры "нуль"), то значение выражения считается ложным. Значения всех других выражений считаются истинными. Иногда результат вычисления истинности или ложности выражения может показаться немного непривычным, например:
'' или "" пустая строка, поэтому - "ложь" 0 или 0.0 0 преобразуется в '0', поэтому - "ложь" +0 или -0 0 преобразуется в '0', поэтому - "ложь" 5-(3+2) равно 0, который преобразуется в '0', поэтому - "ложь" undef неопределенное значение дает в результате '', поэтому - "ложь" '1' или 'false' не пустая строка и не '0', поэтому - "истина" '00' или '0.0' не пустая строка и не '0', поэтому - "истина" '-0' или '+0' не пустая строка и не '0', поэтому - "истина" '0 but true' не пустая строка, значит - "истина"
Интервал:
Закладка: