Branch Coverage

blib/lib/MarpaX/ESLIF/URI/tel.pm
Criterion Covered Total %
branch 17 44 38.6


line true false branch
218 0 0 if ($keya eq 'ext' or $keya eq 'isub') { }
0 0 elsif ($keya eq 'phone-context') { }
0 0 elsif ($keyb eq 'phone-context') { }
219 0 0 if ($keyb eq 'ext' or $keyb eq 'isub') { }
234 0 0 if ($keyb eq 'ext' or $keyb eq 'isub') { }
243 0 0 if ($keya eq 'ext' or $keya eq 'isub') { }
266 21 9 defined $pvalue ? :
270 10 20 if ($type eq 'normalized')
277 0 10 if (grep {$_ eq $key;} map({$_->{'key'};} @{$self->_parameters->{$type};})) { }
3 7 elsif (@{$self->_parameters->{$type};}) { }
280 0 3 if ($key eq 'ext' or $key eq 'isub') { }
0 3 elsif ($key eq 'phone-context') { }
285 0 0 if ($previouskey ne 'ext' and $previouskey ne 'isub')
295 0 0 if ($firstkey eq 'ext' or $firstkey eq 'isub')
296 0 0 if ($#{$self->_parameters->{$type};} > 0)
298 0 0 if ($secondkey eq 'ext' or $secondkey eq 'isub') { }
305 0 0 if ($max >= 0 and $#{$self->_parameters->{$type};} != $max)
314 2 1 if ($previouskey ne 'ext' and $previouskey ne 'isub' and $previouskey ne 'phone-context')
315 0 2 if (($previouskey cmp $key) >= 0)
337 30 0 if substr($pname{$type}, 0, 1) eq ';'
338 21 9 if substr($pname{$type}, -1, 1) eq '='
342 7 3 if (defined $pvalue)