Создание текстовых документов с использованием языка Perl представляет собой тривиальную задачу. Вам только необходимо удостовериться, что вы поместили правильный НТМ L заголовок в начале текстового документа. Например, следующий скрипт создает простой текстовый документ, содержащий сообщение Hello , world :
print “Content-type: text/plain\n\n”;
print “Hello, world\n”;
Создание текстовых документов HTML также очень легко. Например, в следующем фрагменте текста создается простой документ HTML :
print <<HTML;
Content-type: text/html
<HTML>
<HEAD><TITLE>Test Using HTML</TITLE></HEAD>
<BODY>
<H1><CENTER>
Hello, world
</CENTER></H1>
</ BODY ></ HTML >
HTML
Эти примеры больше походят на исходные коды HTML , чем на программу на языке Perl . Действительно, если вы удалите несколько строк, вы будете иметь H TML-файл. Эта иллюстративная программа использует свойства языка Perl , которые не были рассмотрены в предыдущей главе, но они достаточно просты для понимания.
Строка << HTML и последняя строка с символами HTML представляют собой конструкцию, называемую «здесь-документ» ( here document ), которая перешла сюда из терминологии программирования shell для UNIX . «Здесь-документ» представляет собой просто несколько строк литералов. Perl обрабатывает «здесь-документ» как строку в двойных кавычках.
Поскольку «здесь-документ» делает исходный код на языке Perl легким для чтения, то использование такой конструкции является идеальным для создания HTML-документов. Используя конструкцию «здесь-документ», скрипт на языке Perl может не иметь символов цитирования и символов новой строки, и не должен содержать функций printf. Конструкция «здесь-документ» широко используется в рассматриваемых далее в этой главе примерах.