#!/usr/bin/perl
 
print <<MyEND
Content-type: text/html; charset=utf-8
 
<HTML>
<HEAD>
<TITLE>Первый cgi-скрипт!!</TITLE>
</HEAD>
<BODY>
<H1>Первый cgi-скрипт</H1>
<P>Данный скрипт оформлен с особым способом вывода PERL\'а &quot;here-is-document&quot;.</P>
<P>Вполне возможно использовать и другие способы вывода с помощью функции <TT>print</TT>.</P>
</BODY>
</HTML>
 
MyEND
 
__END__