Branch Coverage

blib/lib/JCM/Net/Patricia.pm
Criterion Covered Total %
branch 54 154 35.0


line true false branch
54 4 3 if ($type == 2)
58 3 0 if ($type == 10)
59 3 0 if (&have_ipv6()) { }
77 15 54 if (ref $self eq 'JCM::Net::Patricia::AF_INET6') { }
78 11 4 $str =~ s[/(\d+)$][] ? :
80 38 16 $str =~ s[/(\d+)$][] ? :
86 0 38 if @_ < 2 or @_ > 3
88 8 30 unless @_ > 2
93 0 17 if @_ != 2
99 0 8 if @_ != 2
105 0 2 if @_ != 2
115 0 4 if @_ != 2
125 0 3 if @_
128 0 1 if @_ != 3
135 2 0 if $self->add_string($_, $data)
141 0 1 if @_ != 2
148 2 0 if $self->remove_string($_)
172 0 29 if @_ < 2 or @_ > 4
174 0 0 defined $bits ? :
0 29 if @_ < 4
176 1 28 unless defined $packed
177 0 28 if @_ < 3
182 0 0 if @_ < 2 or @_ > 4
186 0 0 unless defined $ip
187 0 0 defined $bits ? :
0 0 if @_ < 4
188 0 0 if @_ < 3
193 0 6 if @_ < 2 or @_ > 3
195 6 0 if @_ < 3
200 0 0 if @_ < 2 or @_ > 3
202 0 0 if @_ < 3
207 0 6 if @_ < 2 or @_ > 3
209 2 4 if @_ < 3
214 0 15 if @_ < 2 or @_ > 3
217 0 15 unless defined $packed
218 0 15 if @_ < 3
223 0 4 if @_ < 2 or @_ > 3
226 0 4 unless defined $packed
227 0 4 if @_ < 3
232 0 2 if @_ < 2 or @_ > 3
235 0 2 unless defined $packed
236 0 2 if @_ < 3
241 0 4 if @_ < 2 or @_ > 3
244 0 4 unless defined $packed
245 0 4 if @_ < 3
250 0 0 if @_ < 2 or @_ > 3
252 0 0 if @_ < 3
275 0 9 if @_ < 2 or @_ > 4
277 0 0 defined $bits ? :
0 9 if @_ < 3
279 0 9 unless defined $packed
280 0 9 if @_ < 4
285 0 0 if @_ < 2 or @_ > 4
289 0 0 unless defined $ip
290 0 0 defined $bits ? :
0 0 if @_ < 3
291 0 0 if @_ < 4
296 0 0 if @_ < 2 or @_ > 3
298 0 0 if @_ < 3
303 0 0 if @_ < 2 or @_ > 3
305 0 0 if @_ < 3
310 0 0 if @_ < 2 or @_ > 3
312 0 0 if @_ < 3
317 0 2 if @_ < 2 or @_ > 3
320 0 2 unless defined $packed
321 0 2 if @_ < 3
326 0 4 if @_ < 2 or @_ > 3
329 0 4 unless defined $packed
330 0 4 if @_ < 3
335 0 0 if @_ < 2 or @_ > 3
338 0 0 unless defined $packed
339 0 0 if @_ < 3
344 0 0 if @_ < 2 or @_ > 3
347 0 0 unless defined $packed
348 0 0 if @_ < 3
353 0 0 if @_ < 2 or @_ > 3
355 0 0 if @_ < 3