blib/lib/WWW/RobotRules/AnyDBM_File.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 22 | 26 | 84.6 |
line | true | false | branch |
---|---|---|---|
44 | 0 | 4 | unless $file |
48 | 0 | 4 | unless tie %{$$self{'dbm'};}, 'AnyDBM_File', $file, 66, 416 |
51 | 2 | 2 | if ($ua) { } |
57 | 1 | 1 | unless $ua |
66 | 2 | 3 | if (defined $newname) |
68 | 2 | 0 | unless ($old and $old eq $newname) |
83 | 1 | 4 | unless $t |
90 | 0 | 2 | unless $t |
97 | 3 | 3 | if ($old) |
100 | 2 | 4 | if (defined $fresh) |
113 | 2 | 2 | if ($old) |
116 | 1 | 1 | if $last > $time |
148 | 4 | 8 | unless $rule |