| blib/lib/Object/Remote/Connector/LocalSudo.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 16 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 43 | 0 | 0 | unless my $pid = open3(my $foreign_stdin, my $foreign_stdout, $sudo_stderr, @{$self->sudo_perl_command;}) |
| 46 | 0 | 0 | if ($line eq 'GO') { } |
| 0 | 0 | elsif ($line =~ /\[sudo\]/) { } | |
| 50 | 0 | 0 | unless $cb |
| 54 | 0 | 0 | if ($line and $line ne 'GO') { } |
| 0 | 0 | elsif (not $line) { } | |
| 59 | 0 | 0 | unless $line eq 'GO' |
| 70 | 0 | 0 | if (sysread($sudo_stderr, my $buf, 32768) > 0) { } |