if ($username eq $user) { my $pword = ${$uid.$user}{'password'}; my $expiration = "Sunday, 17-Jan-2038 00:00:00 GMT"; &UpdateCookie("write", $user, $pword, ${$uid.$user}{'session'}, "/", $expiration); &LoadUser($user); }