line |
true |
false |
branch |
55
|
0 |
0 |
unless $num =~ /\A\d+\z/u and $num > 0
|
61
|
0 |
0 |
if (scalar @fibs >= $num) { }
|
|
0 |
0 |
elsif (wantarray) { }
|
66
|
0 |
0 |
wantarray ? :
|
107
|
0 |
0 |
unless not $num =~ /\D/u and $num > 0
|
110
|
0 |
0 |
unless not $_
|
113
|
0 |
0 |
unless defined $ranges and ref $ranges eq 'ARRAY' and grep({$_ =~ /\D/u unless not $_;} @$ranges) == 0
|
126
|
0 |
0 |
if $all and scalar @ranges != scalar @$ranges
|
130
|
0 |
0 |
unless scalar @ranges
|
136
|
0 |
0 |
if (wantarray and not $all)
|
139
|
0 |
0 |
if $num % $mult == 0
|
149
|
0 |
0 |
$all ? :
|
153
|
0 |
0 |
if (wantarray) { }
|
154
|
0 |
0 |
$status ? :
|
157
|
0 |
0 |
$status ? :
|