| line |
true |
false |
branch |
|
109
|
0 |
0 |
if $DEBUG |
|
110
|
0 |
0 |
unless my $bw = 'File::ReadBackwards'->new($filename) |
|
112
|
0 |
0 |
unless $linenum |
|
119
|
0 |
0 |
if ($count == $linenum) |
|
138
|
0 |
0 |
if $mylog->{$key} |
|
140
|
0 |
0 |
if $mycount->{$key}[0] |
|
141
|
0 |
0 |
if $DEBUG |
|
149
|
0 |
0 |
if ($DEBUG) |
|
160
|
0 |
0 |
if ($DEBUG) |
|
176
|
0 |
0 |
if $result->{$_} eq '' |
|
181
|
0 |
0 |
if $DEBUG |
|
183
|
0 |
0 |
if $ip |
|
184
|
0 |
0 |
if $requrl |
|
185
|
0 |
0 |
if $status |
|
186
|
0 |
0 |
if $siteurl |
|
187
|
0 |
0 |
if $DEBUG |
|
210
|
0 |
0 |
if $@ |
|
228
|
0 |
0 |
if /$IP/ and /INPUT/ and /DROP/ |
|
231
|
0 |
0 |
if ($dist) { } |
|
250
|
0 |
0 |
unless open my $nFD, '<', $conf |
|
252
|
0 |
0 |
if $DEBUG |
|
253
|
0 |
0 |
if /$ip/ |
|
258
|
0 |
0 |
unless ($bid) |