line |
true |
false |
branch |
41
|
0 |
0 |
unless tie %Sessions, 'SDBM_File', '/.cpan/build/Slash-OurNet-1.41-YHGHXl/t/ournet.db', 66, 438 |
50
|
0 |
0 |
if (exists $$vars{'op'} and $$vars{'op'} eq 'userlogin') { } |
|
0 |
0 |
elsif ($CGI->path_translated or $CGI::MOD_PERL or $^O ne 'MSWin32') { } |
53
|
0 |
0 |
if $bbs |
55
|
0 |
0 |
if (exists $$bbs{'users'}{$uid}) |
58
|
0 |
0 |
if (crypt($pwd, $crypted) eq $crypted) |
67
|
0 |
0 |
if exists $cookies{$flavor} |
77
|
0 |
0 |
if ($cookie and $Sessions{$cookie->value}) |
78
|
0 |
0 |
if (exists $$vars{'op'} and $$vars{'op'} eq 'userclose') { } |
89
|
0 |
0 |
if $show_cookie |
111
|
0 |
0 |
if $key eq 'nickname' |
112
|
0 |
0 |
if ($key eq 'fakeemail') |
121
|
0 |
0 |
unless $key |
123
|
0 |
0 |
if ($key eq 'is_anon') { } |
|
0 |
0 |
elsif ($key eq 'off_set') { } |
136
|
0 |
0 |
exists $ENV{'SCRIPT_FILENAME'} ? : |
137
|
0 |
0 |
unless $path =~ s[[\\/][^\\/]+$][/templates] |
138
|
0 |
0 |
if $Slash::OurNet::Theme |
147
|
0 |
0 |
unless open my $fh, $path |
155
|
0 |
0 |
select() eq 'main::STDOUT' ? : |