blib/lib/Log/Log4perl/Resurrector.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 10 | 14 | 71.4 |
line | true | false | branch |
---|---|---|---|
27 | 0 | 6 | unless open FILE, "<$file" |
54 | 0 | 7 | if ($resurrecting eq $module) |
63 | 1 | 6 | if ($module =~ m[^Log/Log4perl/Appender]) |
71 | 6 | 0 | unless (-f $module) |
75 | 0 | 6 | unless (defined $path) |
100 | 6 | 49 | if ref $_ |
102 | 6 | 43 | if -f $path |