Синтаксис языка Perl

Синтаксис языка был специально создан по возможности максимально понятным для человека.

Начнём с того, что если программа состоит из одного модуля и из одной функции, то признаки начала и конца программы могут отсутствовать, в отличие от многих языков вроде Fortran (program X() … end), C/C++ (void main() {…}) и т. п.

Переменные всегда пишутся с префиксом $ (например, $i – переменная i). Массивы начинаются с префикса @ (@str – весь массив str), если к ним идёт обращение целиком. Если обращаться к отдельному элементу массива, то это уже переменная, а значит, должна писаться как $str[$i] – i-ый элемент массива str. Между префиксами и именами переменных/массивов не должно быть никаких пробелов.

Размер массива можно узнать с помощью оператора scalar:

@array = (1,-6,9,18,0,-10); # Инициализация массива

$arr_size = scalar @array; # $arr_size равен 6

Ещё одно отличие от языков Fortran, C/C++ заключается в необязательности отдельной инициализации переменных и массивов. Программа сама определит наличие переменных и массивов при первом использовании. Необязательность инициализации означает и необязательность типизации переменных. Подходящий тип переменной подбирается автоматически.

Все операторы, как и в языках C/C++, обязательно заканчиваются точкой с запятой. Все составные операторы (условия, цикла и т. п.) должны заключать блоки своих операторов в фигурные скобки, даже если блок состоит всего из одного оператора. Например:

if ($i > 5)

{ $i = $i +1; }

Комментарии однострочные, начинаются с символа # и до конца строки:

# это комментарий

$operator1 = 1; # и это тоже комментарий

$operator2 = 2;

Рассмотрим синтаксис основных составных операторов Perl.

if (выражение) { БЛОК }

if (выражение) { БЛОК 1 } else { БЛОК 2 }

if (выражение_1) { БЛОК_1 } elsif (выражение_2) { БЛОК_2 }... else { БЛОК_N }

while (выражение) { БЛОК }

for (выражение_1; выражение_2; выражение_3) { БЛОК }

do { БЛОК } until выражение;

foreach переменная (список) { БЛОК }

Почти все они соответствуют операторам языка C/C++, кроме foreach, который эквивалентен циклу по каждому элементу в массиве. Например, следующие операторы эквивалентны:

@array = (1,-6,9,18,0,-10); # Общая часть – инициализация массива

# Операторы…

for ($i = 0; $i < 6; $i++)

{ print $array[$i]; }

# … и …

foreach $i (@array)

{ print $i; }

# … эквивалентны.

В качестве оператора конкатенации строк служит символ точки:

$Str = "a"."b"; # Str = "ab".

Дата добавления: 2015-08-27