Новости | FAQ | Авторы | Документация | В действии | Библиотека |
Инструменты | Полезные ссылки | Хостинги | Скачать | Примеры | Форум |
yz 27.05.2003 14:18
Давайте. Такой пример подойдёт?#!/usr/local/bin/perl use CGI; local $query=new CGI; print $query->header('text/html; charset=koi8-r'); print $query->start_html(); $myself=$query->url; print $query->startform('POST',$myself,'KOI8-R'); print $query->textfield(-name=>'test', -size=>40, -maxlength=>40, -override=>0, -value=>"" ); print $query->submit(-value=>"Ok"); print $query->endform; local $string = $query->param('test'); print "$string\n"; print $query->end_html;К сожалению, с С я не сильно дружу, поэтому буду благодарен, если Вы дадите пример С'шного кода.