| lib/LEOCHARRE/BogusFile.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 3 | 10 | 30.0 |
| line | l | !l | condition |
|---|---|---|---|
| 20 | 0 | 0 | Carp::cluck("$path already on disk") and return |
| 28 | 0 | 0 | Carp::Cluck("cant open for writing '${path}', $!") and return |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 80 | 0 | 1 | 11 | $totalbytes and $totalbytes =~ /^\d+$/ |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 42 | 4 | 0 | 0 | $length ||= int rand($LEOCHARRE::BogusFile::MAXLENGTH) + 1 |