| blib/lib/IO/InSitu.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 13 | 20 | 65.0 |
| line | true | false | branch |
|---|---|---|---|
| 20 | 1 | 2 | ref $_[-1] eq 'HASH' ? : |
| 23 | 0 | 3 | unless defined $out_name |
| 25 | 0 | 3 | if @_ or not defined $out_name |
| 28 | 1 | 2 | defined $$opt_arg{'tmp'} ? : |
| 30 | 0 | 3 | unless ref $in_name or -e $in_name |
| 35 | 3 | 0 | if (-e $out_name) |
| 39 | 1 | 2 | if $in_dev != $out_dev or $in_node != $out_node |
| 48 | 0 | 2 | unless $in = 'IO::File::SE'->new($tmp_name, '<') |
| 55 | 0 | 1 | unless open $in, '<', $in_name |
| 58 | 0 | 3 | unless open $out, '>', $out_name |