| inc/Test2/Plugin/INC_Jail.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 12 | 16 | 75.0 |
| line | true | false | branch |
|---|---|---|---|
| 17 | 6 | 1 | unless (defined $test_class) |
| 18 | 0 | 6 | unless my $code = $caller->can("CLASS") |
| 24 | 7 | 0 | unless @test_inc |
| 27 | 0 | 7 | unless -d $_ |
| 36 | 19 | 242 | if ($test_class eq $pkg) |
| 39 | 10 | 0 | $] ge '5.020' ? : |
| 10 | 9 | if open $fh, "<", "$dir/$_[1]" | |
| 49 | 133 | 109 | unless $caller eq $pkg |