| blib/lib/Test/Regression.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 13 | 14 | 92.8 |
| line | true | false | branch |
|---|---|---|---|
| 66 | 2 | 18 | if ($@) |
| 72 | 9 | 9 | if ($ENV{'TEST_REGRESSION_GEN'}) |
| 74 | 3 | 6 | unless $fh->open(">$file") |
| 77 | 4 | 2 | if (length $output) |
| 78 | 2 | 2 | unless $fh->print($output) |
| 85 | 3 | 6 | unless -r $file |
| 87 | 0 | 6 | unless $fh->open("<$file") |