Branch Coverage

blib/lib/Image/Base/SVGout.pm
Criterion Covered Total %
branch 4 56 7.1


line true false branch
36 0 4 if (ref $class)
39 0 0 if ($$self{'-filehandle'})
46 0 4 if (defined $params{'-file'})
54 0 4 if ($$self{'-filehandle'})
61 0 1 if ($$self{'-filehandle'})
63 0 0 if (exists $param{$key})
68 0 0 if (exists $param{$key})
77 0 0 if (defined $$self{$key} and !defined($newval) || $newval ne $$self{$key})
85 0 0 if (defined $$self{$key} and !defined($newval) || $newval != $$self{$key})
95 0 0 unless print $fh @_, "\n"
116 0 0 if ($$self{'save_done'})
121 0 0 unless (defined $filename)
127 0 0 unless (defined $width and defined $height)
139 0 0 unless open my $fh, '>', $filename
142 0 0 defined($title = $$self{'-title'}) ? :
0 0 defined($description = $$self{'-description'}) ? :
0 0 unless print $fh qq[\n\n\n\n], defined($title = $$self{'-title'}) ? ('', _entitize($title), "\n") : (), defined($description = $$self{'-description'}) ? ('', _entitize($$self{'-description'}), '') : ()
165 0 0 if (my $fh = delete $$self{'-filehandle'})
166 0 0 unless close $fh
173 0 0 if (@_ > 1) { }
189 0 0 if (@_ == 3) { }
204 0 0 unless ($fill)
210 0 0 $fill ? :
226 0 0 unless ($fill)
230 0 0 $fill ? :
256 0 0 if ($fill) { }
267 0 0 $fill ? :
293 0 0 unless $entity{$1}