| line |
true |
false |
branch |
|
79
|
3 |
10 |
if ref $args[0] eq 'HASH' |
|
81
|
1 |
12 |
if @args % 2 |
|
86
|
7 |
5 |
if (exists $args{'Bits'}) |
|
105
|
0 |
25 |
unless (exists $legal_args_href->{$arg_key}) |
|
112
|
0 |
25 |
unless (defined $arg_value) |
|
126
|
10 |
0 |
if $remainder == 0 |
|
136
|
0 |
8 |
if ($bits < $min) { } |
|
|
0 |
8 |
elsif ($bits > $max) { } |
|
156
|
20 |
36 |
exists $args->{$arg} ? : |
|
187
|
20 |
25 |
if defined $self->{$opt} |
|
202
|
1 |
9 |
unless defined $source |
|
213
|
5 |
2710 |
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
|
149 |
1 |
defined $bag ? : |
|
269
|
148 |
2 |
defined $bytes ? : |
|
274
|
1 |
148 |
if $range < 1 |
|
289
|
1 |
1 |
unless 'ARRAY' eq ref $aref |
|
290
|
0 |
1 |
unless @$aref |
|
302
|
10197 |
1 |
defined $count ? : |
|
305
|
3 |
10195 |
unless defined $self->{'_RNG'} |
|
335
|
10228 |
1 |
defined $range ? : |
|
337
|
1 |
10228 |
if $range < 0 |
|
338
|
1 |
10227 |
if $range > 4294967296 |
|
344
|
10227 |
41157 |
if $d >= $range |
|
357
|
1 |
10001 |
unless defined $self->{'_RNG'} |
|
397
|
1 |
5 |
defined $eof ? : |
|
412
|
1 |
5 |
defined $eof ? : |