Некоторые сведения о Perl 5: различия между версиями
→[[Категория:Языки программирования]]: Добавлена категория. |
м Ivan Shmakov переименовал страницу Perl учебник в Некоторые сведения о Perl: Грамматичность. |
(нет различий)
|
Версия от 20:23, 18 декабря 2013
Переменные
Переменные в Perl обозначаются символами $
(скаляры), @
(векторы или массивы) или %
(таблицы или ассоциативные массивы) перед именем. Например:
my $answer = 42;
my @name = ("Smith", "John");
my %favorites
= ("color" => "green",
"fruit" => "watermelon");
Подробно о массивах
Подробно о векторах
Типы чисел в Perl
bool одно из двух значений ( TRUE, FALSE ) +/- плюс/минус
Функция print
Функция print
последовательно выводит аргументы в указанный поток (по-умолчанию: на стандартный вывод.) Например:
print ("Hello", @name, "!\n"); # предполагаем local $, = " ";
print STDERR ("ERROR!\n");
Арифметические операторы
Perl поддерживает вполне обычный набор арифметических операторов:
+
,-
,*
,/
,%
- сложение, вычитание, умножение, частное и остаток от деления, соответственно;
&
,|
- поразрядные битовые умножение и сложение; пример:
123 & 456
→ 72 (001111011₂ ⊙ 111001000₂ = 001001000₂.) <<
,>>
- целочисленный битовый сдвиг (умножение на 2ⁿ.)
\
Вне двойный кавычек используется как самостоятельный оператор создания ссылки на переменную, подобно:
my $answer = 1;
my $reference = \$answer;
$$reference = 42;
# переменная $answer теперь хранит значение 42
В двойных кавычках указывает на особое значение следующего символа. В частности:
\n
— разрыв (перевод) строки;\t
— табуляция;\N{имя}
— символ по имени или кодовой позиции Unicode (с ведущимU+
);\"
— двойная кавычка (без экранирующего\
двойная кавычка стала бы закрывающей для данной строковой константы.)
Примеры:
"Текст \"текст\", текст";
"\N{U+263a}\n"; # → "☺\n"
NB: в некоторых случаях, форма "Текст «текст», текст"
может быть более уместна, чем "Текст \"текст\", текст"
.
Формы q {} и qq {}
Альтернатива одинарным и двойным кавычкам, позволяющая применять произвольный разделитель. Подобно:
q /Текст "текст", текст/
qq {Текст "текст", текст}
Операторы if, unless
- Синтаксис
if (условие) блок операторов
Пример:
my $a = 10;
if ($a == 10) {
print "a равна 10";
}
unless ($a == 10) {
print "a не равна 10";
}
Отметим, что Perl позволяет указывать операторы if
и unless
после условной ветви, подобно:
print "a равна 10"
if ($a == 10);
print "a не равна 10"
unless ($a == 10);
Внимание! Учебник неправильно построен по содержанию. |
Мало ссылок. Дополните содержания учебника. |