|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Artem Chuprina 2:5020/371.32 13 Nov 2000 13:11:49
To : Alexander Bolotnov
Subject : Re: cookie
--------------------------------------------------------------------------------
<Alexander_Bolotnov@p82.f4.n5052.z2.fidonet.org> wrote:
AB> All, 07 Nov 00, Alexander Bolotnov -> All:
>> почему, когда я включаю .pl, который достает и обрабатывает куку в
>> html документ, то он исполняется, но кука не достается... Где рыть?
AB> в догонку, вот коды, на случай если телепатов нет :):
AB> === Cut ===
AB> #!d:\perl\bin\perl.exe
AB> use CGI qw/:standard/;
AB> use CGI::Cookie;
AB> $q = new CGI;
AB> $name = $q->param('name');
AB> $pwd = $q->param('pwd');
AB> if (!cookie('info')){
AB> $c = new CGI::Cookie(-name=>'info', -value=>$name._.$pwd, -expires=>'+1M');
AB> print header(-cookie=>[$c]);
AB> }
AB> else{
AB> ($n,$p) = $q->cookie('info') =~/(.+)_(.+)/;
AB> print header;
AB> }
AB> print start_html,
AB> start_form(-action=>'set.pl'),
AB> "name: ",textfield(-value=> "$n", 'name'),
AB> "pwd: ",textfield(-value=> "$p", 'name'),
AB> submit,
AB> end_form,
AB> end_html;
AB> === Cut ===
AB> === Cut ===
AB> <html>
AB> <body>
AB> <!--#exec cgi="set.pl" -->
AB> </body>
AB> </html> === Cut === :)))
AB> [NewNet] Alexander Bolotnov.
Для начала он ее не "не достает", а "не выставляет". Потому что SSI игнорирует
отданный им заголовок, за исключением статуса. По очевидной, надеюсь, причине.
--
Счастливо!
Ран.
--- ifmail v.2.14.os-p7-tma3
* Origin: MemoNet (2:5020/371.32@fidonet)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
| Тема: |
Автор: |
Дата: |
|
cookie |
Alexander Bolotnov |
07 Nov 2000 12:05:32 |
 cookie |
Alexander Bolotnov |
07 Nov 2000 12:51:17 |
 Re: cookie |
Artem Chuprina |
13 Nov 2000 13:11:49 |
|
cookie |
Alexander Bolotnov |
13 Nov 2000 22:56:07 |
 Re: cookie |
I.Kochubinskiy |
14 Nov 2000 12:56:31 |
|
Re: cookie |
Artem Chuprina |
14 Nov 2000 19:58:13 |
|
|
