| line |
true |
false |
branch |
|
149
|
0 |
230 |
if $protoref |
|
154
|
0 |
230 |
if @_ < 1 |
|
155
|
0 |
230 |
if @_ % 2 |
|
159
|
0 |
230 |
unless defined wantarray |
|
177
|
0 |
458 |
unless defined $key |
|
182
|
157 |
301 |
if ($key eq 'min') |
|
183
|
0 |
157 |
unless defined $val |
|
185
|
109 |
48 |
unless UNIVERSAL::isa($val, 'Math::BigInt') |
|
187
|
0 |
157 |
if $val->is_nan |
|
195
|
157 |
144 |
if ($key eq 'max') |
|
196
|
0 |
157 |
unless defined $val |
|
198
|
109 |
48 |
unless UNIVERSAL::isa($val, 'Math::BigInt') |
|
200
|
0 |
157 |
if $val->is_nan |
|
208
|
71 |
73 |
if ($key eq 'length') |
|
209
|
0 |
71 |
unless defined $val |
|
211
|
0 |
71 |
unless $val > 0 |
|
220
|
71 |
2 |
if ($key eq 'base') |
|
221
|
0 |
71 |
unless defined $val |
|
223
|
0 |
71 |
unless $val > 0 |
|
231
|
1 |
1 |
if ($key eq 'length_hex') |
|
232
|
0 |
1 |
unless defined $val |
|
234
|
0 |
1 |
unless $val > 0 |
|
243
|
1 |
0 |
if ($key eq 'length_bin') |
|
244
|
0 |
1 |
unless defined $val |
|
246
|
0 |
1 |
unless $val > 0 |
|
263
|
157 |
73 |
if (defined $self->{'max'}) { } |
|
265
|
0 |
157 |
if (defined $self->{'length'}) |
|
268
|
0 |
157 |
unless (defined $self->{'min'}) |
|
273
|
0 |
157 |
if $self->{'max'} < $self->{'min'} |
|
277
|
73 |
0 |
if (defined $self->{'length'}) { } |
|
294
|
230 |
0 |
if $rand_bits == 48 |
|
355
|
0 |
226 |
unless $selfref |
|
361
|
0 |
226 |
if @_ > 1 |
|
366
|
187 |
39 |
if (@_) |
|
368
|
0 |
187 |
unless defined $count |
|
370
|
0 |
187 |
unless $count = int $count |
|
404
|
122 |
104 |
if wantarray |