Branch Coverage

blib/lib/Data/Page/Pageset.pm
Criterion Covered Total %
branch 23 32 71.8


line true false branch
24 0 2 unless $page->UNIVERSAL::isa('Data::Page')
33 0 2 if (not defined $param or ref $param eq '') { }
1 1 elsif (defined $$param{'max_pagesets'}) { }
1 0 elsif (defined $$param{'pages_per_set'}) { }
48 2 2 if ($_[0])
51 2 2 wantarray ? :
56 1 0 if (defined $number)
58 0 1 if $number < 1
59 0 1 if $number == $$self{'_MAX_PAGESETS'}
68 2 2 if (defined $number)
70 0 2 if $number < 2
71 0 2 if $number == $$self{'_PAGE_PER_SET'}
92 2 8 if ($current_page >= $chunk->first and $current_page <= $chunk->last)
95 1 1 if $#pageset
97 2 8 if $#pageset and $pageset[-2]->is_current
100 2 0 if $#pageset