line |
true |
false |
branch |
26
|
0 |
0 |
exists $init{'limit'} ? : |
|
0 |
0 |
exists $init{'timeout'} ? : |
33
|
0 |
0 |
if $$self{'limit'} <= 0 or $$self{'timeout'} <= 0 |
41
|
0 |
0 |
if defined $$self{'exceeded'} |
44
|
0 |
0 |
if $length and $addr |
47
|
0 |
0 |
if $hostname =~ /\s/ |
48
|
0 |
0 |
if $hostip =~ /\s/ |
61
|
0 |
0 |
if $$self{'exceeded'} |
64
|
0 |
0 |
unless (-f $file) |
65
|
0 |
0 |
unless open FH, ">$file" |
69
|
0 |
0 |
unless open FH, "+<$file" |
74
|
0 |
0 |
if $ENV{'DEBUG'} and ("$ENV{'DEBUG'}" & "\cB") ne "\000" |
77
|
0 |
0 |
if /^(\d+) (\d+) ([^\s]+)\n/ |
84
|
0 |
0 |
if ($add_self) { } |
85
|
0 |
0 |
if (@content >= $$self{'limit'}) { } |
96
|
0 |
0 |
if $ENV{'DEBUG'} and ("$ENV{'DEBUG'}" & "\cB") ne "\000" |
107
|
0 |
0 |
unless $$self{'added'} and defined $$self{'exceeded'} |