| blib/lib/Text/Authinfo.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % | 
| condition | 7 | 32 | 21.8 | 
| line | !l | l&&!r | l&&r | condition | 
|---|---|---|---|---|
| 46 | 0 | 0 | 1 | defined $l{'machine'} and defined $l{'login'} | 
| 0 | 0 | 1 | defined $l{'machine'} and defined $l{'login'} and defined $l{'password'} | |
| 102 | 0 | 0 | 0 | defined $ops and ref $ops ne 'HASH' | 
| line | l | !l | condition | 
|---|---|---|---|
| 101 | 0 | 0 | shift() || undef | 
| line | l | !l&&r | !l&&!r | condition | 
|---|---|---|---|---|
| 24 | 1 | 0 | 0 | shift() || $authinfofile | 
| 36 | 1 | 0 | 0 | 'Text::CSV'->new({'sep_char', ' '}) || croak('new Text::CSV') | 
| 70 | 2 | 0 | 0 | shift() || croak('use: getauth(machine,login,[port])') | 
| 71 | 2 | 0 | 0 | shift() || croak('use: getauth(machine,login,[port])') | 
| 72 | 2 | 0 | 0 | shift() || $wildcard | 
| 109 | 0 | 0 | 0 | $$self{'FILE'} || croak("rm old $$self{'FILE'}:$!") | 
| 121 | 0 | 0 | 0 | $$self{'FILE'} || croak("chmod fail on $$self{'FILE'}:$!") |