Первая программа на Perl

Как не трудно заметить, никаких признаков Perl в исходном коде нет. При выводе HTML-тегов с помощью оператора print весь код отображается на одной строке. Чтобы отобразить каждый тег на отдельной строке, необходи¬мо добавить символ перевода строки. Для системы UNIX таким символом будет \п. В операционной системе Windows перевод строки состо¬ит из комбинации двух символов \г\п.
#!/usr/bin/perl -w
# Выводим все сообщения об ошибках
# в окно Web-браузера
use CGI::Carp qw(fatalsToBrowser); print "Content-type: text/html\n\n";
print "<HTML>\n"; print "<HEAD>\n";
print "<ТIТLЕ>Первая программа</ТIТLЕ>\п";
print "</HEAD>\n";
print "<BODY>\n";
print "Hello, world\n";
print "</BODY>\n";
print "</HTML>";
Теперь каждый тег будет на своей строке.
Результат вывода предыдущей программы
<HTML>
<HEAD>
<ТIТLЕ>Первая программа</ТIТLЕ>
</HEAD>
<BODY>
Hello, world </BODY>
</HTML>


Страница: 1 | 2 | 3


Web сайты на Perl и MySql