Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно
Ant Ant вне форума Автор темы

Пользователь


Сообщения: 74
Благодарности: 0

Профиль | Отправить PM | Цитировать


Конечно, я приведу код ниже. А пока замечу, что charset менял на все лады и meta вставлял куда только можно, не смотря на то, что теоретически в этом нет смысла. Прога простая, пробная. Получает из HTML-формы значения полей name и description, после чего при нажатии на кнопку «Послать», программа выводит эти значения в генерируемой странице. И все.

Вот код:

#!/usr/bin/perl -w
use CGI qw(:standard);
use strict;

print header;

#Прога просто генерирует HTML-страницу с данными введенными ранее
print "<meta HTTP-EQUIV='Content-Type' Content='text-html; charset=windows-1251'>\n";
print "<html>\n<head>\n<title>Ответ</title>\n";
print "</head>\n<body>";
#Выводим имя взятое в поле name формы:
print "Ваше имя: ", param('name'), "<br>\n";
#Выводим описание взятое в поле name формы:
print "Ваше описание ", param('description'), "<br>\n";
print "<hr>\n";
print "</body>\n</html>\n";



Отправлено: 09:42, 21-02-2003 | #5