| line |
true |
false |
branch |
|
14
|
0 |
1 |
if $class ne 'Data::Pager' |
|
37
|
2192 |
0 |
unless $links % 2 |
|
45
|
0 |
2192 |
if $current * $offset - $offset + 1 > $limit |
|
48
|
13152 |
0 |
if $i * $offset - $offset < $limit |
|
51
|
13117 |
35 |
if $i > 0 |
|
54
|
9 |
2183 |
if (scalar keys %pager < $links and $current < 5) |
|
56
|
0 |
45 |
if $middle > $limit |
|
58
|
24 |
21 |
unless exists $pager{$middle} |
|
67
|
2192 |
21909 |
if $pos == $current |
|
69
|
24088 |
13 |
$pos - 1 ? : |
|
|
0 |
24101 |
$pos * $offset >= $limit ? : |
|
98
|
0 |
1101 |
wantarray ? : |
|
107
|
2191 |
12954 |
if ($method eq 'set_current') |
|
108
|
2191 |
0 |
if ($value > 0) |
|
111
|
2191 |
0 |
if ($self->current eq $value) { } |