line |
true |
false |
branch |
99
|
0 |
65 |
if $$self{'_options'}{'debug'} > 2 |
101
|
6 |
59 |
if ($idx + 1 > $$self{'_cache_size'}) |
111
|
0 |
1 |
if $$self{'_options'}{'debug'} > 2 |
123
|
0 |
29 |
if $$self{'_options'}{'debug'} > 2 |
131
|
0 |
6 |
if $$self{'_options'}{'debug'} > 2 |
133
|
0 |
6 |
if $count <= $$self{'_cache_size'} |
143
|
1 |
70 |
if $new_limit < 55 |
153
|
0 |
5 |
if $$self{'_options'}{'debug'} > 2 |
155
|
0 |
5 |
if ($$self{'_options'}{'cache'}) |
156
|
0 |
0 |
unless untie $$self{'_cache'} |
168
|
2 |
1 |
if ($key eq 'precompute') { } |
|
0 |
1 |
elsif ($key eq 'cache') { } |
|
0 |
1 |
elsif ($key eq 'debug') { } |
|
0 |
1 |
elsif ($key eq 'extend_step') { } |
|
1 |
0 |
elsif ($key eq 'extend_ceiling') { } |
169
|
0 |
2 |
unless $value =~ /^\d+$/ and $value > 0 |
174
|
0 |
0 |
if -e $value and not -w $value |
177
|
0 |
0 |
if $value =~ /\D/ |
180
|
0 |
0 |
if $value =~ /\D/ |
183
|
0 |
1 |
if $value =~ /\D/ |
200
|
0 |
5 |
if ($$self{'_options'}{'cache'}) { } |
205
|
0 |
0 |
unless tie @cache, 'DB_File', $$self{'_options'}{'cache'}, &DB_File::O_CREAT | &DB_File::O_RDWR, 420, $DB_File::DB_RECNO |
211
|
0 |
0 |
unless ($$self{'_cache'} and ref $$self{'_cache'} eq 'ARRAY' and defined $$self{'_cache'}[1] and $$self{'_cache'}[1] == 2 and defined $$self{'_cache'}[2] and $$self{'_cache'}[2] == 3) |
222
|
0 |
0 |
unless tie @cache, 'DB_File', $$self{'_options'}{'cache'}, &DB_File::O_CREAT | &DB_File::O_RDWR, 420, $DB_File::DB_RECNO |
249
|
1 |
4 |
if ($$self{'_options'}{'extend_ceiling'} and $$self{'_options'}{'extend_ceiling'} < 7500) |
255
|
4 |
1 |
if ($$self{'_options'}{'precompute'} and $$self{'_options'}{'precompute'} > $$self{'_max_prime'}) |
269
|
0 |
75 |
if $$self{'_options'}{'debug'} > 1 |
272
|
58 |
17 |
if $limit <= $$self{'_limit'} |
274
|
0 |
17 |
if $$self{'_options'}{'extend_ceiling'} and $limit > $$self{'_options'}{'extend_ceiling'} |
285
|
0 |
1484 |
if ($$self{'_options'}{'debug'} > 0) |
287
|
0 |
0 |
if ($x_p > $progress) |
295
|
0 |
202072 |
if $$self{'_options'}{'debug'} > 3 |
297
|
5053 |
72350 |
if ($n > $$self{'_max_prime'} and $x > $y and $n <= $limit and $n % 12 == 11) |
306
|
6029 |
140634 |
if ($n > $$self{'_max_prime'} and $n <= $limit and $n % 12 == 7) |
311
|
13853 |
17179 |
if ($n > $$self{'_max_prime'} and $n <= $limit and $n % 12 == 1 || $n % 12 == 5) |
322
|
0 |
1416 |
if ($$self{'_options'}{'debug'} > 0) |
324
|
0 |
0 |
if ($x_p > $progress) |
330
|
1068 |
348 |
unless $$self{'_sieve'}{$n} |
331
|
0 |
348 |
if $$self{'_options'}{'debug'} > 3 |
339
|
0 |
348 |
if $$self{'_options'}{'debug'} > 3 |
344
|
0 |
79797 |
if ($$self{'_options'}{'debug'} > 0) |
346
|
0 |
0 |
if ($x_p > $progress) |
352
|
71545 |
8252 |
unless $$self{'_sieve'}{$n} |
353
|
0 |
8252 |
if $$self{'_options'}{'debug'} > 2 |