line |
true |
false |
branch |
79
|
3 |
9 |
if ref $args[0] eq 'HASH' |
81
|
1 |
11 |
if @args % 2 |
86
|
7 |
4 |
if (exists $args{'Bits'}) |
105
|
1 |
26 |
unless (exists $$legal_args_href{$arg_key}) |
112
|
1 |
25 |
unless (defined $arg_value) |
126
|
10 |
2 |
if $remainder == 0 |
136
|
1 |
9 |
if ($bits < $min) { } |
|
1 |
8 |
elsif ($bits > $max) { } |
156
|
20 |
29 |
exists $$args{$arg} ? : |
187
|
18 |
22 |
if defined $$self{$opt} |
202
|
1 |
8 |
unless defined $source |
213
|
5 |
2822 |
unless looks_like_number $input and $input == int $input and $input >= 0 |
224
|
2561 |
1 |
defined $bytes ? : |
227
|
3 |
2556 |
unless defined $$self{'_RNG'} |
236
|
2528 |
31 |
if ($bytes > 0) |
239
|
15 |
2513 |
if $bytes >= 2 |
241
|
2521 |
7 |
if $bytes % 2 |
250
|
1 |
1 |
defined $eol ? : |
262
|
1 |
1 |
defined $eol ? : |
268
|
261 |
1 |
defined $bag ? : |
269
|
260 |
2 |
defined $bytes ? : |
274
|
1 |
260 |
if $range < 1 |
290
|
657 |
1 |
defined $count ? : |
293
|
2 |
656 |
unless defined $$self{'_RNG'} |
323
|
688 |
1 |
defined $range ? : |
325
|
1 |
688 |
if $range < 0 |
326
|
1 |
687 |
if $range > 4294967296 |
332
|
687 |
4572 |
if $d >= $range |
345
|
1 |
10001 |
unless defined $$self{'_RNG'} |
385
|
1 |
5 |
defined $eof ? : |
400
|
1 |
5 |
defined $eof ? : |