|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Dmitry Hodos 2:5004/1.27 25 May 2000 11:08:41 To : Vadim Sizikh Subject : Re: куки -------------------------------------------------------------------------------- >>>>> "VS" == Vadim Sizikh writes: VS> Или он у меня ее не создает, или я ее найти не могу. :-7 VS> /Смотрите! Это же Windows Clipboard!/ VS> #!/web/perl/bin/perl -w VS> use CGI qw (:standard); VS> use CGI::Cookie; VS> print "Content-type: text/html\n\n"; VS> print start_html("Hello World"), h1 ("Hello World"); VS> $cookie = $query->cookie(-name=>'sessionID', VS> -value=>'xyzzy', VS> -expires=>'+1h', VS> -path=>'/cgi-bin/database', VS> -domain=>'.capricorn.org', VS> -secure=>1); VS> print $query->header(-cookie=>$cookie); VS> print end_html; При таком раскладе кука окажется где-то в теле HTML. $query->header() -- это первое, что нужно вывести на stdout. Затем start_html и все остальное, вплоть до end_html. При использовании модуля CGI явный вывод Content-Type не нужен. см. header() и вообще perldoc CGI. -- Best regards, Dmitry Hodos --- Gnus v5.6.45/XEmacs 21.1 - "Biscayne" * Origin: Avtomatika-S ZAO (2:5004/1.27@fidonet) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/146761f57cfae.html, оценка из 5, голосов 10
|