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