Branch Coverage

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