| blib/lib/Test/Out.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 12 | 33 | 36.3 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 163 | 0 | 0 | 4 | exists $$obj{'output'} and *{$$obj{'output'};}{'IO'}->isa('IO::Handle') |
| 214 | 0 | 0 | 4 | exists $$self{'_io_handle'} and exists $$self{'_saved_handle'} |
| 234 | 0 | 0 | 0 | exists $$self{'_io_handle'} and exists $$self{'_saved_handle'} |
| 273 | 0 | 0 | 4 | $unlink and -f $file |
| line | l | !l | condition |
|---|---|---|---|
| 319 | 1 | 0 | shift() || (return $self->do_fail('$obj->is_output("string")')) |
| 320 | 1 | 0 | shift() || '' |
| 331 | 1 | 0 | shift() || (return $self->do_fail('$obj->isnt_output("string")')) |
| 332 | 1 | 0 | shift() || '' |
| 343 | 1 | 0 | shift() || (return $self->do_fail('$obj->like_output(qr/regex/)')) |
| 344 | 1 | 0 | shift() || '' |
| 351 | 1 | 0 | shift() || (return $self->do_fail('$obj->unlike_output(qr/regex/)')) |
| 352 | 1 | 0 | shift() || '' |
| 361 | 0 | 0 | $name ||= '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 127 | 0 | 4 | 0 | ref $proto || $proto |