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'}:$!") |