Branch Coverage

blib/lib/Net/DNS/RR/SVCB.pm
Criterion Covered Total %
branch 64 64 100.0


line true false branch
53 1 13 unless $index == length $rdata
79 6 16 unless scalar @$params
95 9 22 if $key > 15
114 9 33 if (/^key\d+=(.*)$/i) { }
21 12 elsif (/^[^=]+=(.*)$/) { }
115 8 1 length $1 ? :
117 18 3 length $1 ? :
121 3 9 unless $keybyname{lc $_}
137 22 8 scalar @$paramref ? :
140 6 16 if (defined $svcparam{'0'})
143 1 7 if $unique{'0'}
144 1 6 if --$unique{$_}
145 1 5 unless defined $svcparam{$_}
149 1 18 if defined $svcparam{'2'} and not $svcparam{'1'}
174 37 2 $self->{'TargetName'} ? :
175 6 31 unless $self->{'SvcPriority'}
176 3 28 $target eq '.' ? :
182 11 2 unless $keybyname{lc $_}
183 12 1 /(\d+)$/ ? :
194 1 3 defined wantarray ? :
224 1 1 defined wantarray ? :
233 50 8 scalar @arg ? :
256 2 3 if /\\092,|\\092\\092/
271 2 75 unless $method =~ /^key[0]*(\d+)$/i
277 60 15 if (scalar @argument) { }
279 23 37 unless defined $arg
280 1 59 if defined $svcparams{$key}
281 1 58 if $key > 65534
282 35 23 if defined $arg
284 3 55 if scalar @argument
286 6 9 unless defined wantarray
290 32 32 defined $value ? :