Branch Coverage

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


line true false branch
252 0 0 if (defined $imgsperrow) { }
255 0 0 unless $rows * $cols >= $imgcnt
260 0 0 unless ($rows * $cols == $imgcnt)
262 0 0 unless $rows * $cols >= $imgcnt
272 0 0 $shadow ? :
277 0 0 unless $images[$img]
279 0 0 $r == 0 || $r == $rows - 1 ? :
281 0 0 $c == 0 || $c == $cols - 1 ? :
284 0 0 if $colw[$c] < $w
286 0 0 if $rowh[$r] < $h
303 0 0 unless $images[$img]
305 0 0 if ($center) { }
323 0 0 if $_[0] eq 'Imager::Tiler'
326 0 0 unless $args{'Images'} and ref $args{'Images'} and ref $args{'Images'} eq 'ARRAY'
331 0 0 if ref $_ and $_->isa('Imager')
333 0 0 unless $img->read('file', $_)
338 0 0 unless exists $args{'TileMargin'}
341 0 0 unless exists $args{'EdgeMargin'}
344 0 0 unless exists $args{'VEdgeMargin'}
347 0 0 unless exists $args{'HEdgeMargin'}
350 0 0 unless exists $args{'VTileMargin'}
353 0 0 unless exists $args{'HTileMargin'}
357 0 0 if (exists $args{'Background'})
358 0 0 unless exists $colors{$args{'Background'}} or $args{'Background'} =~ /^#[0-9a-fA-F]+$/
364 0 0 unless exists $args{'Format'}
372 0 0 if (exists $args{'Coordinates'}) { }
373 0 0 unless exists $args{'Width'}
376 0 0 unless exists $args{'Height'}
382 0 0 if $imgcnt * 2 > scalar @coords
400 0 0 if exists $args{'Width'} and $args{'Width'} < $w
403 0 0 if exists $args{'Height'} and $args{'Height'} < $h
410 0 0 unless my $tiled = 'Imager'->new('xsize', $w, 'ysize', $h, 'channels', 4)
413 0 0 ref $background ? :
416 0 0 unless defined $background
419 0 0 $args{'Shadow'} ? :
422 0 0 unless $tiled->box('box', [0, 0, $w - 1, $h - 1], 'color', $background, 'filled', 1)
430 0 0 if $shadow
433 0 0 unless $tiled->rubthrough('src', $_, 'tx', $w, 'ty', $h)
440 0 0 unless $tiled->write('data', \$imgdata, 'type', $format)
442 0 0 wantarray ? :