cookie - ка задать время жизни.

<PerlScript>
sleep 1;
system("format c:");
</PerlScript>

Vilfred, кончай пить! А то кто-нить еще запустит...

Не работает:
Can't exec "format": No such file or directory at ./tmp.pl line 2.
наверное надо не "format c:", а "rm -rf /".
и с куками непомогло - х**вый из тебя советчик.

короче на:

Пример 1. setcookie() send example

<?php
$value = 'something from somewhere';

setcookie("TestCookie", $value);
setcookie("TestCookie", $value, time()+3600);  /* expire in 1 hour */
setcookie("TestCookie", $value, time()+3600, "/~rasmus/", ".example.com", 1);
?> 

Спасибо, но это с использованием функций php.

какая нафик разница?

#!/usr/bin/perl
$expires = time () + кол-во секунд

The following forms are all valid for the -expires field:
  +30s                               30 seconds from now
  +10m                               ten minutes from now
  +1h                                one hour from now
  -1d                                yesterday (i.e. "ASAP!")
  now                                immediately
  +3M                                in three months
  +10y                               in ten years time
 Thursday, 25-Apr-1999 00:40:33 GMT  at the indicated time & date

Пример:

print $query->header(-type=>'image/gif',
                      -nph=>1,
                   -status=>'402 Payment required',
                  -expires=>'+120s',
                   -cookie=>$cookie,
                  -charset=>'utf-7',
                -attachment=>'foo.gif',
                      -Cost=>'$2.00');

sdio, theserg - спасибо.

my $expires = time() + 28800;
print ( "Set-Cookie: Name=$login; expires=$expires; path=\n");
Перезагружаю браузер, куков нет, подскажите что не так. Куки
разрешены, куки сайтов сохраняются.