| blib/lib/Text/Authinfo.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 4 | 24 | 16.6 |
| line | true | false | branch |
|---|---|---|---|
| 38 | 0 | 1 | unless open my $fh, '<', $$self{'FILE'} |
| 46 | 1 | 0 | if (defined $l{'machine'} and defined $l{'login'} and defined $l{'password'}) { } |
| 51 | 1 | 0 | if defined $l{'port'} |
| 61 | 0 | 1 | unless close $fh |
| 89 | 0 | 0 | if $port ne $wildcard |
| 102 | 0 | 0 | if (defined $ops and ref $ops ne 'HASH') |
| 106 | 0 | 0 | if (-w $$self{'FILE'}) |
| 108 | 0 | 0 | if (defined $$ops{'nobackup'}) { } |
| 112 | 0 | 0 | unless move($$self{'FILE'}, $bak) |
| 117 | 0 | 0 | if ($c) |
| 118 | 0 | 0 | unless open my $fh, '>', $$self{'FILE'} |
| 120 | 0 | 0 | unless close $fh |