Здравствуйте,
подскажите плиз, почему не хочет работать logout:
...
elsif ($action eq "logout"){
my $query = CGI->new;
print $query->redirect(
-Location => "$ENV{\'HTTP_REFERER\'}" ,
-Cookie => [
$query->cookie(
-name => \'id\',
-value => \' \',
-expires => \'+1s\'
),
$query->cookie(
-name => \'regcode\',
-value => \' \',
-expires => \'+1s\'
)
]
);
}