Branch Coverage

blib/lib/DBD/Gofer/Transport/stream.pm
Criterion Covered Total %
branch 20 56 35.7


line true false branch
29 0 148 unless $self->go_perl
37 148 0 unless defined $persist
38 148 0 $persist ? :
39 140 8 if ($persist{$key} and $self->_connection_check($persist{$key}))
40 0 140 if $self->trace >= 1
46 8 0 if ($key)
47 0 8 if keys %persist > $persist_all
60 0 140 if $self->trace
69 0 0 if $self->trace
89 0 8 if (my $url = $self->go_url)
90 0 0 unless $url =~ s/^ssh://
96 0 0 if join($", @$go_perl) eq $^X
101 0 8 if $self->trace
125 0 380 if $trace >= 4
131 0 380 unless ($wfh->print($encoded_request))
137 0 380 if $trace >= 4
147 0 380 if $trace >= 4
158 0 0 if $trace >= 4
163 0 0 if $trace >= 4
164 380 0 $encoded_response =~ s/\015\012$// ? :
171 0 380 unless ($encoded_response)
173 0 0 if $errno
174 0 0 if ($stderr_msg)
176 0 0 kill(0, $pid) ? :
184 0 380 if $trace >= 4
187 0 380 if $stderr_msg and $trace
195 0 380 if ($stderr_msg)
197 0 0 unless $stderr_msg =~ /^Using .*blib/ and join($", @$cmd) =~ /-Mblib/