- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
my $uid = 0;
my $parse_uid = $parse_sid->{uid} || 0;
my $memd_uid = $RR::Init::memd->get('sid'.$sid) || 0;
# Авторизуем при помощи memd
if ($parse_uid==$memd_uid){
$uid = $memd_uid;
}
# Запоминаем в Куку
$r->pnotes('USER_SID' => $sid);
$param{sid} = $sid;
# Захватываем sid
unless (defined $uid){
$RR::Init::memd->set('sid'.$sid, 0);
}
# Всяке артефакты лезут
$uid||=undef;
Комментарии (7) RSS