line |
true |
false |
branch |
21
|
0 |
0 |
unless (defined $listbox) |
24
|
0 |
0 |
unless (ref $listbox eq 'Tk::Listbox') |
26
|
0 |
0 |
unless defined $listbox |
38
|
0 |
0 |
if ($index > $len - 1) { } |
|
0 |
0 |
elsif ($index < 0) { } |
42
|
0 |
0 |
if $index < 0 |
57
|
0 |
0 |
if ($tolen > $len) { } |
|
0 |
0 |
elsif ($tolen < $len) { } |
68
|
0 |
0 |
if ($ind < 0) |
71
|
0 |
0 |
if ($ind >= $len) |
86
|
0 |
0 |
if ($tolen > $len) |
97
|
0 |
0 |
@_ ? : |
98
|
0 |
0 |
if $off < 0 |
99
|
0 |
0 |
@_ ? : |
100
|
0 |
0 |
if $diff < 0 |
105
|
0 |
0 |
if $off > $len |
106
|
0 |
0 |
if $off + $diff > $len |
107
|
0 |
0 |
if (@_ > $diff) { } |
|
0 |
0 |
elsif (@_ < $diff) { } |
130
|
0 |
0 |
wantarray ? : |
145
|
0 |
0 |
if ($newsize >= 0) |