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") |