Branch Coverage

blib/lib/DBD/Gofer/Transport/Base.pm
Criterion Covered Total %
branch 59 92 64.1


line true false branch
38 6 709 if $args->{'go_cache'}
44 715 0 unless $ENV{'DBD_GOFER_TRACE'}
59 18 7120 if ($go_cache = $self->{'go_cache'})
63 18 0 if ($request_cache_key)
65 4 14 if ($frozen_response)
66 0 4 if $trace
69 0 4 if $trace
74 0 14 if $@
76 0 14 if $trace
83 0 7214 if $trace
84 760 6454 if $to
88 0 0 $! eq 'Broken pipe' ? :
91 760 6454 if $to
94 760 6454 if $to
96 0 7214 if ($@)
97 0 0 if $@ eq "TIMEOUT\n"
107 0 7134 if ($response)
109 0 0 if $request_cache_key
113 0 7134 if $trace and $response
116 0 7134 unless wantarray
137 760 6457 if $to
140 760 6457 if $to
143 760 6457 if $to
145 0 7217 if ($@)
146 0 0 if $@ eq "TIMEOUT\n"
156 80 7057 if ($self->response_needs_retransmit($request, $response))
162 7134 0 if ($response)
166 14 0 if $request_cache_key and $self->{'go_cache'}
177 204 2917 if (my $go_retry_hook = $self->go_retry_hook)
179 204 0 defined $retry ? :
181 204 0 if defined $retry
189 60 2857 if $response->executed_flag_set
191 2661 196 if ($response->errstr || '') =~ /induced by DBI_GOFER_RANDOM/
193 84 112 if $request->is_idempotent
202 11153 3121 unless my $err = $response->err
207 286 2835 unless ($retry)
215 2720 115 unless ($retry_limit)
222 32 83 if ($retry_count >= $retry_limit)
235 0 83 if (ref $retry eq 'CODE')
236 0 0 if &$retry($retry_count, $retry_limit)
261 0 18 unless $request->is_idempotent
275 0 14 unless my $go_cache = $self->{'go_cache'}
278 0 14 unless $frozen_response
279 0 14 unless $request_cache_key
281 14 0 if ($frozen_response and $request_cache_key)
284 0 14 if $@