|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Alexander Bolotnov 2:5052/4.82 07 Nov 2000 12:51:17 To : All Subject : cookie -------------------------------------------------------------------------------- > почему, когда я включаю .pl, который достает и обрабатывает куку в > html документ, то он исполняется, но кука не достается... Где рыть? в догонку, вот коды, на случай если телепатов нет :): === Cut === #!d:\perl\bin\perl.exe use CGI qw/:standard/; use CGI::Cookie; $q = new CGI; $name = $q->param('name'); $pwd = $q->param('pwd'); if (!cookie('info')){ $c = new CGI::Cookie(-name=>'info', -value=>$name._.$pwd, -expires=>'+1M'); print header(-cookie=>[$c]); } else{ ($n,$p) = $q->cookie('info') =~/(.+)_(.+)/; print header; } print start_html, start_form(-action=>'set.pl'), "name: ",textfield(-value=> "$n", 'name'), "pwd: ",textfield(-value=> "$p", 'name'), submit, end_form, end_html; === Cut === === Cut === <html> <body> <!--#exec cgi="set.pl" --> </body> </html> === Cut === :))) [NewNet] Alexander Bolotnov. --- * Origin: Я вернулся... (2:5052/4.82) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/27883a07ed10.html, оценка из 5, голосов 10
|