- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 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;
Lure Of Chaos 22.03.2012 20:20 # +2
bugmenot 22.03.2012 22:18 # 0
Lure Of Chaos 22.03.2012 22:28 # 0
bugmenot 22.03.2012 23:49 # +1
roman-kashitsyn 22.03.2012 23:55 # 0
Lure Of Chaos 23.03.2012 18:05 # 0
guest8 09.04.2019 12:52 # −999