|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Bastrakov Oleg 2:5052/4.100 25 Jun 2000 06:01:03
To : Alexey Menshikov
Subject : Такое странное хотенье!
--------------------------------------------------------------------------------
25 Jun 00 в 02:29, Alexey Menshikov написал All:
AM> Зашел первый раз пользователь и ему прописываеться
AM> кука (ну это можно и html-ом сделать) в которой, например a=1000. А
============ 1.pl ============
# ставим куку
print "Set-Cookie: a=1000";
============ 1.pl ============
AM> потом, он заходит еще раз, и perl скрипт должен взять как-то эту куку
AM> и например если а=1000, то он выдаёт одну фразу, если 2000 то другую
AM> ну и т.д. Мне совсем не ясен кусок где скрипт должен брать куку, и
AM> присваевать а какому-то аргументу (для дальнейшего сравнения).
============ 2.pl ============
# проверяем куку клиента
$cookes = $ENV{'HTTP_COOKIE'};
# режем куку в хеш
@cook=split("; ",$cookes);
foreach (@cook) {
@tmp=split("=",$_);
$cooks{$tmp[0]}=$tmp[1];
}
if ($cooks{a}==1000) {
print "одна фраза";
} else {
print "другая фраза";
}
============ 2.pl ============
AM> Hапишите плз!! Если, это сложно, то могу заплатить, но если толком
AM> расскажите!!
куда зайти за заpплатой ?
Олег http://psih-test.da.ru
--- GoldED/W32 3.0.1
* Origin: "Дело мастера БО...." (c) (2:5052/4.100)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
