line |
true |
false |
branch |
40
|
18 |
403 |
if (defined $_s->{'input_data'} and ref $_s->{'input_data'} eq "")
|
42
|
0 |
18 |
unless -e $_s->{'input_data'}
|
47
|
0 |
0 |
if $_s->{$_k} and !&looks_like_number($_s->{$_k}) || $_s->{$_k} < 0
|
51
|
0 |
2526 |
if $_s->{$_k} and ref $_s->{$_k} ne "CODE"
|
56
|
257 |
164 |
if (defined $_s->{'user_tasks'})
|
79
|
827 |
0 |
if (defined $_s->{'max_workers'})
|
83
|
0 |
827 |
unless $_s->{'max_workers'} =~ /\A\d+\z/
|
86
|
421 |
406 |
if (defined $_s->{'chunk_size'})
|
87
|
0 |
421 |
if ($_s->{'chunk_size'} =~ /([0-9\.]+)K\z/i) { }
|
|
0 |
421 |
elsif ($_s->{'chunk_size'} =~ /([0-9\.]+)M\z/i) { }
|
95
|
0 |
421 |
if not $_s->{'chunk_size'} =~ /\A[0-9e\+]+\z/ or $_s->{'chunk_size'} == 0
|
101
|
0 |
827 |
if $_s->{'RS'} and ref $_s->{'RS'} ne ""
|
103
|
0 |
827 |
if $_s->{'max_retries'} and not $_s->{'max_retries'} =~ /\A\d+\z/
|
107
|
0 |
4135 |
if $_s->{$_k} and ref $_s->{$_k} ne "CODE"
|
110
|
268 |
559 |
if (defined $_s->{'gather'})
|
113
|
0 |
143 |
if $_ref ne "MCE::Queue" and $_ref ne "Thread::Queue" and $_ref ne "ARRAY" and $_ref ne "HASH" and $_ref ne "CODE"
|
118
|
18 |
809 |
if (defined $_s->{'sequence'})
|
121
|
18 |
0 |
if (ref $_seq eq 'ARRAY') { }
|
128
|
0 |
0 |
if ref $_seq ne "HASH"
|
134
|
0 |
36 |
unless defined $_seq->{$_k}
|
139
|
0 |
54 |
if defined $_seq->{$_p} and not &looks_like_number($_seq->{$_p})
|
142
|
18 |
0 |
unless (defined $_seq->{'step'})
|
143
|
18 |
0 |
$_seq->{'begin'} <= $_seq->{'end'} ? :
|
144
|
18 |
0 |
if (ref $_s->{'sequence'} eq "ARRAY")
|
149
|
0 |
18 |
if (ref $_s->{'sequence'} eq 'HASH') { }
|
152
|
0 |
0 |
unless $_s->{'sequence'}{$_k} =~ /\./
|
158
|
54 |
0 |
unless $_s->{'sequence'}[$_i] =~ /\./
|
162
|
0 |
18 |
if ($_seq->{'step'} < 0 and $_seq->{'begin'} < $_seq->{'end'} or $_seq->{'step'} > 0 and $_seq->{'begin'} > $_seq->{'end'} or $_seq->{'step'} == 0)
|
170
|
0 |
827 |
if (defined $_s->{'interval'})
|
171
|
0 |
0 |
if (ref $_s->{'interval'} eq "")
|
177
|
0 |
0 |
if ref $_i ne "HASH"
|
180
|
0 |
0 |
unless defined $_i->{'delay'}
|
182
|
0 |
0 |
if not &looks_like_number($_i->{'delay'}) or $_i->{'delay'} < 0
|
189
|
0 |
0 |
if defined $_i->{$_p} and !&looks_like_number($_i->{$_p}) || int $_i->{$_p} != $_i->{$_p} || $_i->{$_p} < 1
|
193
|
0 |
0 |
unless exists $_i->{'max_nodes'}
|
194
|
0 |
0 |
unless exists $_i->{'node_id'}
|
214
|
0 |
167 |
if $self->{'_wid'}
|
216
|
0 |
167 |
if $self->{'_send_cnt'}
|
218
|
0 |
167 |
if $self->{'_total_running'}
|
235
|
0 |
182 |
unless defined $_chunk_size and defined $_max_workers
|
237
|
0 |
182 |
if (defined $_params and exists $_params->{'chunk_size'})
|
241
|
0 |
182 |
if ($_chunk_size =~ /([0-9\.]+)K\z/i) { }
|
|
0 |
182 |
elsif ($_chunk_size =~ /([0-9\.]+)M\z/i) { }
|
248
|
182 |
0 |
if ($_chunk_size eq "auto")
|
250
|
0 |
182 |
if (defined $_params and ref $_params->{'input_data'} eq "CODE" or defined $_input_data and ref $_input_data eq "CODE")
|
271
|
24 |
158 |
if (defined $_input_data)
|
272
|
18 |
6 |
if (ref $_input_data eq 'ARRAY') { }
|
|
6 |
0 |
elsif (ref $_input_data eq 'HASH') { }
|
279
|
18 |
164 |
if (defined $_params and exists $_params->{'sequence'}) { }
|
|
36 |
128 |
elsif (defined $_params and exists $_params->{'_file'}) { }
|
|
24 |
104 |
elsif (defined $_input_data) { }
|
282
|
0 |
18 |
if (ref $_params->{'sequence'} eq 'HASH') { }
|
293
|
18 |
0 |
unless (defined $_input_data or $_array_size)
|
300
|
0 |
36 |
if ($_ref eq 'SCALAR') { }
|
|
18 |
18 |
elsif ($_ref eq '') { }
|
311
|
0 |
24 |
if (ref($_input_data) =~ /^(?:GLOB|FileHandle|IO::)/) { }
|
|
0 |
24 |
elsif (ref $_input_data eq 'SCALAR') { }
|
319
|
36 |
146 |
if (defined $_is_file) { }
|
320
|
18 |
18 |
if ($_size)
|
322
|
0 |
18 |
if $_chunk_size > 5242880
|
323
|
18 |
0 |
if ($_chunk_size <= 8192)
|
324
|
12 |
6 |
(caller()) =~ /^MCE::(?:Grep|Map|Stream)/ ? :
|
330
|
0 |
146 |
if $_chunk_size > 8000
|
331
|
146 |
0 |
if ($_chunk_size < 2)
|
332
|
49 |
97 |
(caller()) =~ /^MCE::(?:Grep|Map|Stream)/ ? :
|
346
|
0 |
1091 |
unless defined $_max_workers
|
348
|
126 |
965 |
if ($_max_workers =~ m[^auto(?:$|\s*([\-\+/\*])\s*(.+)$)]i) { }
|
|
54 |
911 |
elsif ($_max_workers =~ /^([0-9.]+)%$/) { }
|
352
|
126 |
0 |
if $_ncpu_ul > 8
|
354
|
48 |
78 |
if (defined $1 and defined $2) { }
|
356
|
12 |
36 |
if not $_max_workers or $_max_workers < 1
|
357
|
0 |
48 |
if $_max_workers > $_ncpu
|
368
|
12 |
42 |
if $_max_workers < 1
|
378
|
0 |
72 |
unless defined $_n
|
382
|
0 |
72 |
if (not &looks_like_number($_n) or int $_n != $_n or $_n < 1)
|