Branch Coverage

blib/lib/Image/ExifTool/RTF.pm
Criterion Covered Total %
branch 61 90 67.7


line true false branch
123 0 46 unless ($$dataPt =~ /(\\*)([{}])/g)
127 0 0 unless $raf and $raf->Read($buff, 65536)
135 4 42 if $1 and length $1 & 1
136 14 28 if $2 eq "{"
137 14 14 unless --$level <= 0
152 5 6 unless ($val =~ /\\/)
158 1 34 $1 ? :
161 1 34 unless $2
172 34 6 $val =~ /\\/g ? :
175 15 25 if $n > 0
177 6 34 if $p1 >= $len
179 25 9 if ($val =~ /\G([a-zA-Z]+)(-?\d+)? ?/g) { }
181 2 23 if ($1 eq 'uc') { }
20 3 elsif ($1 eq 'u') { }
3 0 elsif ($rtfEntity{$1}) { }
184 0 20 if ($2 < 0) { }
190 1 19 if ($skip)
193 0 1 unless $val =~ /\G([^\\]|\\([a-zA-Z]+)(-?\d+)? ?|\\'.{2}|\\.){$skip}/g
202 5 4 if ($ch eq q[']) { }
204 0 5 if $p1 + 3 > $len
206 5 0 if ($hex =~ /^[0-9a-fA-F]{2}$/)
234 0 1 unless $raf->Read($buff, 64) and $raf->Seek(0, 0)
235 0 1 unless $buff =~ /^[\n\r]*\{[\n\r]*\\rtf[^a-zA-Z]/
240 1 0 if ($buff =~ /\\ansicpg(\d*)/) { }
0 0 elsif ($buff =~ /\\(ansi|mac|pc|pca)[^a-zA-Z]/) { }
255 0 1 unless ($charset)
265 1 1 unless $raf->Read($buf2, 65536)
266 0 1 if (defined $buff) { }
272 0 1 unless $buff =~ /[^\\]\{[\n\r]*\\info([^a-zA-Z])/g
274 1 0 if $1 ne " "
276 0 1 unless (defined $info)
282 4 4 if $3 ne " "
285 0 8 unless defined $val
287 1 7 if ($tagInfo and $tagInfo->{'Format'} and $tagInfo->{'Format'} eq 'date') { }
292 0 4 unless defined $idx{$1}
301 0 8 unless ($tagInfo)
307 0 1 unless defined $buff
315 1 0 if $1 ne " "
318 0 1 unless (defined $props)
325 0 4 if $3 ne " "
328 0 4 unless defined $val
330 2 2 if ($t eq 'propname') { }
0 2 elsif ($t ne 'staticval' or not defined $tag) { }
338 0 2 unless $tag
340 2 0 unless ($tagTablePtr->{$tag})