мета-данные страницы
  •  
Загрузка не удалась. Возможно, проблемы с правами доступа?

Это старая версия документа! 

#!/usr/bin/perl

$x = $ENV{QUERY_STRING};

print <<MyEND
Content-type: text/html; charset=utf-8

<HTML>
<HEAD>
<TITLE>Отобразим ввод</TITLE>
</HEAD>
<BODY>
<H1>Что было&hellip;</H1>
<hr>
<P>Вы ввели: $x</P>
<P>(следует отметить, что ни элементы формы, 
ни символы вне ASCII-подмножества не декодируются)</P>
<hr>
</BODY>
</HTML>

MyEND

__END__