#!/usr/bin/perl print "Hello, World!\n";Первая строка сообщает где находится интерпретатор языка Perl. В Unix-системах она служит для того, чтобы сопоставить файлу с текстом Perl-программы, обрабатывающее его приложение. Другие операционные системы её игнорируют. Функция print выводит список своих аргументов, преобразованных в строку, в стандартный вывод, по умолчанию ассоциированный с терминалом. Управляющая последовательность \n вызывает переход на новую строку после вывода информации. Отмечу также, что большая часть строк Perl-программы завершается символом ";". Исключением являются строки, содержащие операторы цикла и условные операторы. Сохраним текст программы в файле hello.pl. Запустить программу можно по-разному, например, передав имя файла в качестве аргумента командной строки интерпретатору языка:
perl hello.plВ ОС Unix можно сделать файл выполняемым, применив команду:
chmod 755 hello.plи запустить из командной строки:
./hello.pl
CGI-сценарий на языке Perl - это программа, имеющая свою специфику, заключающуюся в том, что она, как правило, генерирует HTML-документ, посылаемый клиенту в виде ответа сервера. Ответ сервера, так же как и запрос клиента, имеет определённую структуру. Информация о содержимом ответа формируется CGI-программой и должна содержать как минимум один заголовок, сообщающий браузеру формат возвращаемых данных:
Content-type: text/htmlЗаголовки отделяются от содержимого документа пустой строкой. Преобразуем нашу программу hello.pl с учетом вышеописанного в CGI-сценарий hello.cgi:
#!/usr/bin/perl print "Content-type:text/html\n\n"; print "<html><head><Title>HELLO!</Title></head>\n"; print "<body>\n"; print "<h3>Hello, World!</h3>\n"; print "</body></html>\n";
