Perl-программа представляет из себя обычный текстовый файл, содержащий несколько конструкций языка. Последние обычно напоминают смесь из Си, Unix shell script и английского языка. В общем-то, именно так оно и есть на самом деле.
Perl-код может быть достаточно разнообразным. Вот несколько основных правил:
- ведущие пробелы в строке игнорируются. Вы можете расположить оператор языка, где захотите: в начале линии, с отступами (рекомендуется) или даже выровнять по правому краю (но в таком случае читать текст программы и что-либо понять будет крайне трудно);
- конструкция языка должна заканчиваться точкой с запятой, за исключением случаев, когда данная конструкция является последней в блоке или файле, или это - оператор eval;
- пробелы, табуляция, пустые строки иррелевантны, - один пробел также хорош, как сто таких же пробелов. Это означает, что вы можете разбивать конструкцию языка на несколько строк для ясности. Строка - это обычно серия символов, заключенных в кавычки. Глава 2 "Числовые и строковые литералы" содержит более подробное описание строк;
- все что следует за символом "#" игнорируется, если только это не внутри какой-либо строки. Используйте эту возможность для обеспечения вашего кода полезными комментариями. Надо отметить, что многострочных комментариев (например, как в языке Си) в Perl нет.
Аналогично shell-скрипту, Perl-программа состоит из всех операторов Perl, имеющихся в файле и рассматриваемых в совокупности как одна большая программа, подлежащая выполнению. Понятия main-функции, как в Си, в Perl нет.
Вот пример кода на Perl:
#!/usr/bin/perlНе нужно быть слишком умным, чтобы догадаться, что в результате выполнения данного участка кода на экран будет выведено "my name is John". Символ "\n" означает, что интерпретатор в этом месте произведет перевод строки.
Печать нескольких строк также не вызывает затруднений. Это реализуется многократным применением функции print():
#!/usr/bin/perlВ начале любой Perl-программы должна присутствовать строка #path. Где path - путь к интерпретатору Perl в системе. Например, #/usr/bin/perl