Branch Coverage

blib/lib/Imager/Tiler.pm
Criterion Covered Total %
branch 0 80 0.0


line true false branch
233 0 0 if (defined $imgsperrow) { }
236 0 0 unless $rows * $cols >= $imgcnt
241 0 0 unless ($rows * $cols == $imgcnt)
243 0 0 unless $rows * $cols >= $imgcnt
253 0 0 $shadow ? :
258 0 0 unless $images[$img]
260 0 0 $r == 0 || $r == $rows - 1 ? :
262 0 0 $c == 0 || $c == $cols - 1 ? :
265 0 0 if $colw[$c] < $w
267 0 0 if $rowh[$r] < $h
284 0 0 unless $images[$img]
286 0 0 if ($center) { }
304 0 0 if $_[0] eq 'Imager::Tiler'
307 0 0 unless $args{'Images'} and ref $args{'Images'} and ref $args{'Images'} eq 'ARRAY'
313 0 0 if ref $_ and $_->isa('Imager')
315 0 0 unless $img->read('file', $_)
320 0 0 unless exists $args{'TileMargin'}
323 0 0 unless exists $args{'EdgeMargin'}
326 0 0 unless exists $args{'VEdgeMargin'}
329 0 0 unless exists $args{'HEdgeMargin'}
332 0 0 unless exists $args{'VTileMargin'}
335 0 0 unless exists $args{'HTileMargin'}
339 0 0 if (exists $args{'Background'})
340 0 0 unless exists $colors{$args{'Background'}} or $args{'Background'} =~ /^#[0-9a-fA-F]+$/
346 0 0 unless exists $args{'Format'}
354 0 0 if (exists $args{'Coordinates'}) { }
355 0 0 unless exists $args{'Width'}
358 0 0 unless exists $args{'Height'}
364 0 0 if $imgcnt * 2 > scalar @coords
382 0 0 if exists $args{'Width'} and $args{'Width'} < $w
385 0 0 if exists $args{'Height'} and $args{'Height'} < $h
392 0 0 unless my $tiled = 'Imager'->new('xsize', $w, 'ysize', $h, 'channels', 4)
395 0 0 ref $background ? :
398 0 0 unless defined $background
401 0 0 $args{'Shadow'} ? :
404 0 0 unless $tiled->box('box', [0, 0, $w - 1, $h - 1], 'color', $background, 'filled', 1)
412 0 0 if $shadow
415 0 0 unless $tiled->rubthrough('src', $_, 'tx', $w, 'ty', $h)
422 0 0 unless $tiled->write('data', \$imgdata, 'type', $format)
424 0 0 wantarray ? :