Branch Coverage

blib/lib/SVGPDF/Parser.pm
Criterion Covered Total %
branch 40 62 64.5


line true false branch
17 0 33 if defined $args{'debug'}
23 0 36 if ($debug)
52 2 981 if $e =~ s/&#(\d+);/chr $1;/egu
53 2 979 if $e =~ s/&#(x[0-9a-f]+);/chr hex $1;/egiu
54 1 978 if $e =~ s/&(lt|gt|quot|apos|amp);/$emap{$1};/egu
55 2 976 if $e =~ /(&[^;]{0,10})/u
60 0 44 unless defined $data and $data =~ /\S/u
63 0 44 if $data =~ /[\x00-\x08\x0b\x0c\x0e-\x1f]/u
70 0 0 $1 eq q['] ? :
0 0 $1 eq '"' ? :
0 0 $1 eq '<' ? :
0 0 if ($1 eq '&') { }
82 5 37 if $_
0 44 if $data =~ /]]>/u or $data =~ //su or grep {/--/u if $_;} $data =~ /^\s+||\s+$/gsu
93 0 44 if ($params{'fatal_declarations'} and $data =~ /
98 0 44 if ($data =~ /\
106 9 608 if $token =~ /^\s+$/su and not $whitespace_tokens
107 6 602 if $token =~ /<\?$re_name.*?\?>/isu or $token =~ /^
110 116 486 if ($token =~ m[^]iu) { }
217 269 elsif ($token =~ m[^<$re_name(\s[^>]*)*(\s*/)?>]isu) { }
0 269 elsif ($token =~ /^
112 0 116 if $elem->{'name'} ne $1
124 217 0 if (@{$attrib;} == 2 * keys(%{+{@{$attrib;}};})) { }
136 0 217 if $attribs_raw =~ /\S/u or grep {/
138 216 1 unless ($params{'no_entity_parsing'})
154 99 118 if ($token =~ m[\s*/>$]u)
164 268 1 unless ($params{'no_entity_parsing'})
172 0 42 if exists $elem->{'parent'}
174 34 8 if ($whitespace_tokens)
191 0 42 if @{$elem->{'content'};} == 0 or $elem->{'content'}[0]{'type'} ne "e"
197 0 42 unless $_->{'name'} eq $e