| blib/lib/Test/LectroTest/FailureRecorder.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 5 | 10 | 50.0 |
| line | true | false | branch |
|---|---|---|---|
| 84 | 0 | 2 | unless open my $fh, $file |
| 151 | 0 | 10 | unless open my $fh, ">>$file" |
| 157 | 0 | 10 | if $$self{'cache'} |
| 166 | 0 | 1 | if $_ and /^This is perl,(.*)/im |
| 172 | 1 | 0 | unless eval { do { local $_ = `$^X -v`; "perl$1" if $_ and /^This is perl,(.*)/im } } |