blib/lib/Net/IMAP/Simple/PipeSocket.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 0 | 18 | 0.0 |
line | true | false | branch |
---|---|---|---|
15 | 0 | 0 | unless $args{'cmd'} |
17 | 0 | 0 | unless open my $fake, '+>', undef |
20 | 0 | 0 | unless my $pid = eval { do { open3($wtr, $rdr, $err, $args{'cmd'}) } } |
27 | 0 | 0 | unless my $this = tie(*{$fake;}, $class, (%args, 'pid', $pid, 'wtr', $wtr, 'rdr', $rdr, 'err', $err, 'sel', $sel)) |
58 | 0 | 0 | if (eof $fh) |
90 | 0 | 0 | if (my $pid = delete $this->{'pid'}) |
92 | 0 | 0 | if exists $this->{$key} |
112 | 0 | 0 | unless close $rdr |
113 | 0 | 0 | unless close $wtr |