Condition Coverage

blib/lib/Image/ExifTool/XMPStruct.pl
Criterion Covered Total %
condition 63 117 53.8


and 3 conditions

line !l l&&!r l&&r condition
76 19 0 0 $w and not $warn
98 9 0 0 $w and not $warn
199 15 0 29 $fix and not $Image::ExifTool::XMP::specialStruct{$fix}
219 5 5 0 $grp and $grp ne lc $grps[1]
221 0 0 3 $ti->{'Writable'} && $ti->{'Writable'} eq 'lang-alt'
7 3 0 defined $langCode and not $ti->{'Writable'} && $ti->{'Writable'} eq 'lang-alt'
224 10 0 0 defined $priority and $priority >= $pri
253 0 0 1 $fix and not $Image::ExifTool::XMP::specialStruct{$fix}
255 0 0 5 ref $fieldInfo eq "HASH" and $fieldInfo->{'Writable'}
0 0 5 ref $fieldInfo eq "HASH" and $fieldInfo->{'Writable'} and $fieldInfo->{'Writable'} eq "lang-alt"
373 0 0 0 $a2->{'xml:lang'} and $a2->{'xml:lang'} eq $attr->{'xml:lang'}
375 0 0 0 $capture->{$p2} and $capture->{$p2}[0] eq $cap{$p}[0]
456 32 19 20 $tagInfo->{'Writable'} and $tagInfo->{'Writable'} eq "lang-alt"
470 0 71 0 $et and $et->Options("Verbose") > 1
510 22 8 7 $fieldInfo->{'Writable'} and $fieldInfo->{'Writable'} eq "lang-alt"
536 0 2 0 defined $item and $level == 1
555 16 68 1 $addedTag and $fieldInfo->{'StructType'}
68 0 1 $addedTag and $fieldInfo->{'StructType'} and $fieldInfo->{'Table'}
560 47 0 3 $strTable->{'TYPE'} and $changed
652 178 148 0 @$structProps and not $strInfo->{'Struct'}
698 236 127 216 $index and not @$structProps
705 185 7 24 $tagInfo->{'LangCode'} and not ref $tag
828 103 47 0 $var{$_} and push @siList, $_

or 2 conditions

line l !l condition
222 0 10 $ti->{'Priority'} || 1
377 0 0 $match{$1} || 0
460 8 12 $langIdx->{$path} || 0
466 16 4 $langCode || 'x-default'
490 47 3 $strTable->{'NAMESPACE'} || ''
661 3 0 $table->{'GROUPS'}{'0'} || 'XMP'
692 143 186 $tagInfo->{'Writable'} || ''
770 0 0 $tagInfo->{'Namespace'} || $tagInfo->{'Table'}{'NAMESPACE'} || ''
825 215 4 defined $_ or $_ = ""

or 3 conditions

line l !l&&r !l&&!r condition
83 13 0 0 $$obj =~ s/^\s*\}//s or $warn
104 5 0 0 $$obj =~ s/^\s*\]//s or $warn
184 48 3 0 $strTable->{'STRUCT_NAME'} || 'XMP ' . &RegisterNamespace($strTable)
239 0 10 0 $tagInfo->{'Namespace'} || $tagInfo->{'Table'}{'NAMESPACE'}
323 50 1 0 %copy or not $warn
390 0 0 0 not $delPath or $delPath gt $p
423 0 0 0 ref $cap ne "ARRAY" or $cap->[0]
506 1 36 0 $fieldInfo->{'Namespace'} || $ns
5 32 0 $fieldInfo->{'TagID'} || $tag
536 11 0 2 length $item or defined $item and $level == 1