| blib/lib/File/Replace/SingleHandle.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 14 | 14 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 20 | 1 | 36 | unless @_ == 3 |
| 22 | 2 | 34 | unless &blessed($repl) and $repl->isa('File::Replace') |
| 25 | 15 | 19 | if ($mode eq 'in') { } |
| 15 | 4 | elsif ($mode eq 'out') { } | |
| 3 | 1 | elsif ($mode eq 'onlyout') { } | |
| 49 | 10 | 11 | if (defined $self->{'other'} and defined fileno $self->{'other'}) { } |
| 51 | 2 | 8 | unless my $rv = $self->SUPER::CLOSE |