Branch Coverage

blib/lib/Acme/IRC/Art.pm
Criterion Covered Total %
branch 56 80 70.0


line true false branch
73 0 8 if @_ != 3
75 0 8 unless $largeur =~ /^\d+$/ and $hauteur =~ /^\d+$/
77 0 8 unless $largeur =~ /\d/ and $hauteur =~ /\d/
81 8 0 if $hauteur--
147 0 254 if @_ < 4 or @_ > 5
149 0 2 if ref $y and ref $x and @$x != @$y
151 0 254 if ref $y and not ref $x or ref $x and not ref $y
153 0 252 if not ref $x || ref $y and $y > $#canevas || $x > @{$canevas[0];} - 1
156 2 252 if (ref $y) { }
165 101 153 unless defined $on
167 129 129 if ($on >= 0) { }
212 2 10 unless defined $bolt
213 6 6 unless defined $fond
217 0 12 if @_ > 6 or @_ < 4
221 0 11 if not ref $bolt and length $bolt > 3 || !($bolt =~ /\d/ || $bolt =~ /b/) and @_ == 5
223 0 12 unless $x =~ /\d/ and $y =~ /\d/
226 0 12 if not ref $fond and $fond > 15
227 0 12 if not ref $bolt and $bolt > 15
228 0 12 if $y > $#canevas or $x > @{$canevas[0];} - 1
230 1 11 if ref $bolt
231 1 11 if ref $fond
235 4 49 if $a_bolt
236 4 49 if $a_fond
242 4 49 if $$pixel =~ /\003(\d|),(\d)/
244 36 17 if $fond or $$pixel ne ' '
247 4 49 if $bolt eq 'b'
248 20 33 if (($color) = $bolt =~ /b(\d+)/)
249 20 0 if ($fond2, $color, $lettre[$position]) = correction($fond2, $color, $lettre[$position])
252 29 24 if (($color) = $bolt =~ /^(\d+)/)
253 29 0 if ($fond2, $color, $lettre[$position]) = correction($fond2, $color, $lettre[$position])
256 9 0 unless ($bolt or $fond)
257 9 0 if ($fond2, $color, $lettre[$position]) = correction($fond2, $color, $lettre[$position])
260 9 0 unless ($bolt or $fond or $fond2)
261 9 0 if ($fond2, $color, $lettre[$position]) = correction($fond2, $color, $lettre[$position])
266 8 59 if $_[0] =~ /^\d$/ and $_[2] =~ /^\d$/
267 13 54 if $_[1] =~ /^\d$/ and $_[2] =~ /^\d$/
317 0 2 unless defined $fname
319 0 2 unless open FILE, '>', $fname
343 0 1 unless defined $fname
345 0 1 unless open FILE, "$fname"