| line |
true |
false |
branch |
|
19
|
0 |
100002 |
ref $_[-1] eq 'HASH' ? : |
|
24
|
0 |
2 |
if not defined $size or $size eq '0' or not $size =~ / \A \d+ \z /msx |
|
30
|
2 |
100000 |
if (ref $items_ar eq 'ARRAY') |
|
31
|
2 |
0 |
if (@{$items_ar;}) |
|
38
|
0 |
100002 |
if ($$options_hr{'use_unique_list'} and not $$options_hr{'details'}{'using_default_list'}) |
|
40
|
0 |
0 |
$uniq{$_}++ == 0 ? : |
|
43
|
0 |
100002 |
if $size > @items and $$options_hr{'do_not_repeat_index'} |
|
49
|
0 |
100002 |
if (ref $$options_hr{'get_random_index'} eq 'CODE') |
|
60
|
0 |
3200002 |
if ($$options_hr{'do_not_repeat_index'}) |
|
66
|
0 |
0 |
if $try > $size |
|
74
|
0 |
100002 |
wantarray ? : |
|
83
|
0 |
0 |
wantarray ? : |