| line |
true |
false |
branch |
|
53
|
0 |
0 |
if (/^([a-z])(.*)/) |
|
86
|
0 |
0 |
unless -e $file |
|
87
|
0 |
0 |
unless -f _ |
|
88
|
0 |
0 |
unless -r _ |
|
101
|
0 |
0 |
if ($^W and $other_write) |
|
106
|
0 |
0 |
if (open FH, "<$file") { } |
|
119
|
0 |
0 |
-f $datadir . '/users.lua' ? : |
|
120
|
0 |
0 |
-f $datadir . '/lists.lua' ? : |
|
123
|
0 |
0 |
unless -r $users_lua |
|
131
|
0 |
0 |
if (-f $users_lua) { } |
|
|
0 |
0 |
elsif (-d $users_lua) { } |
|
137
|
0 |
0 |
if (opendir DH, $users_lua) { } |
|
139
|
0 |
0 |
unless -f "$users_lua/$user" |
|
140
|
0 |
0 |
unless (-r "$users_lua/$user") |
|
145
|
0 |
0 |
if (length $coderef > 9 and $coderef =~ /^\s*(return )?{.+}\s*$/sig) { } |
|
162
|
0 |
0 |
unless -r $lists_lua |
|
164
|
0 |
0 |
if (-f $lists_lua) { } |
|
|
0 |
0 |
elsif (-d $lists_lua) { } |
|
170
|
0 |
0 |
if (opendir DH, $lists_lua) { } |
|
172
|
0 |
0 |
unless -f "$lists_lua/$list" |
|
173
|
0 |
0 |
unless (-r "$lists_lua/$list") |
|
178
|
0 |
0 |
if (length $coderef > 9 and $coderef =~ /^\s*(return )?{.+}\s*$/sig) { } |
|
196
|
0 |
0 |
unless exists $$users{$member}{'lists'} |
|
197
|
0 |
0 |
unless exists $$lists{$list}{'users'} |
|
207
|
0 |
0 |
unless $Colloquy::Data::DEBUG |
|
212
|
0 |
0 |
unless $Colloquy::Data::DEBUG |