line |
true |
false |
branch |
151
|
0 |
230 |
if $protoref |
156
|
0 |
230 |
if @_ < 1 |
157
|
0 |
230 |
if @_ % 2 |
161
|
0 |
230 |
unless defined wantarray |
179
|
0 |
458 |
unless defined $key |
184
|
157 |
301 |
if ($key eq 'min') |
185
|
0 |
157 |
unless defined $val |
187
|
109 |
48 |
unless UNIVERSAL::isa($val, 'Math::BigInt') |
189
|
0 |
157 |
if $val->is_nan |
197
|
157 |
144 |
if ($key eq 'max') |
198
|
0 |
157 |
unless defined $val |
200
|
109 |
48 |
unless UNIVERSAL::isa($val, 'Math::BigInt') |
202
|
0 |
157 |
if $val->is_nan |
210
|
71 |
73 |
if ($key eq 'length') |
211
|
0 |
71 |
unless defined $val |
213
|
0 |
71 |
unless $val > 0 |
222
|
71 |
2 |
if ($key eq 'base') |
223
|
0 |
71 |
unless defined $val |
225
|
0 |
71 |
unless $val > 0 |
233
|
1 |
1 |
if ($key eq 'length_hex') |
234
|
0 |
1 |
unless defined $val |
236
|
0 |
1 |
unless $val > 0 |
245
|
1 |
0 |
if ($key eq 'length_bin') |
246
|
0 |
1 |
unless defined $val |
248
|
0 |
1 |
unless $val > 0 |
265
|
157 |
73 |
if (defined $$self{'max'}) { } |
267
|
0 |
157 |
if (defined $$self{'length'}) |
270
|
0 |
157 |
unless (defined $$self{'min'}) |
274
|
0 |
157 |
if $$self{'max'} < $$self{'min'} |
279
|
73 |
0 |
if (defined $$self{'length'}) { } |
354
|
0 |
226 |
unless $selfref |
360
|
0 |
226 |
if @_ > 1 |
365
|
187 |
39 |
if (@_) |
367
|
0 |
187 |
unless defined $count |
369
|
0 |
187 |
unless $count = int $count |
403
|
122 |
104 |
if wantarray |