Компилируемые и интерпретируемые языки программирования

В отличие от компилируемых языков вроде Fortran и C/C++, Perl относится к разряду интерпретируемых языков. Для его выполнения не создаётся исполняемого (*.exe) файла, а идёт выполнение программы сразу, построчно. Этот факт, с одной стороны, позволяет обходиться без компилятора, генерирующего исполняемый файл, и убыстряет механизм написания текста программы и его отладки при должном подходе, а с другой стороны, требует для исполнения программы наличия инсталлированного интерпретатора и замедляет процесс самого выполнения программы.

Исходя из достоинств и недостатков интерпретируемых языков следует, что их область эффективной применимости (где написание программы именно на таком языке более целесообразно) – это не очень затратные задачи, в которых вероятна модификация.

Написание программы на языке Perl

Текст программы можно написать в любом текстовом редакторе (например, в Блокноте в Windows). Файл нужно сохранить с расширением .pl, после чего исполнить его (т.е. активировать, запустить).

Лучше исполнять скрипт не двойным щелчком левой клавиши мыши в окне проводника, а перед этим запустить командную строку и исполнить его оттуда, поскольку в первом случае окно выполнения скрипта будет закрыто сразу после выполнения программы, что не даст возможности для анализа результатов.

Синтаксис языка 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".