Branch Coverage

blib/lib/MCE/Util.pm
Criterion Covered Total %
branch 38 164 23.1


line true false branch
27 0 107 $^O =~ /mswin|mingw|msys|cygwin/i ? :
54 5 61 if defined $g_ncpu
64 61 0 if (/linux/)
66 61 0 if (open $fh, "<", "/proc/stat")
70 61 0 if $count
74 0 0 if (/bsd|darwin|dragonfly/)
76 0 0 if @output
80 0 0 if (/aix/)
82 0 0 if (@output)
84 0 0 if $1
86 0 0 unless ($ncpu)
88 0 0 if (@output) { }
92 0 0 if @output
98 0 0 if (/gnu/)
100 0 0 if @output
104 0 0 if (/haiku/)
106 0 0 if @output
110 0 0 if (/hp-?ux/)
112 0 0 if $count
116 0 0 if (/irix/)
118 0 0 if @out
122 0 0 if (/osf|solaris|sunos|svr5|sco/)
123 0 0 if (-x '/usr/sbin/psrinfo') { }
125 0 0 if $count
129 0 0 if @output
134 0 0 if (/mswin|mingw|msys|cygwin/)
135 0 0 if (exists $ENV{'NUMBER_OF_PROCESSORS'})
144 0 61 if not $ncpu or $ncpu < 1
160 0 386 unless defined $_obj->{$_p}
162 0 386 if (ref $_obj->{$_p} eq 'ARRAY') { }
164 0 0 unless defined $_obj->{$_p}[$_i]
165 0 0 if fileno $_obj->{$_p}[$_i]
170 386 0 if fileno $_obj->{$_p}
183 166 606 unless defined $_obj->{$_p}
185 154 452 if (ref $_obj->{$_p} eq 'ARRAY') { }
187 0 478 unless defined $_obj->{$_p}[$_i]
188 478 0 if (fileno $_obj->{$_p}[$_i])
189 0 478 if $_is_winenv
197 452 0 if (fileno $_obj->{$_p})
198 0 452 if $_is_winenv
213 0 431 if (defined $_i) { }
216 0 0 unless pipe $_obj->{$_r_sock}[$_i], $_obj->{$_w_sock}[$_i]
220 0 431 unless pipe $_obj->{$_r_sock}, $_obj->{$_w_sock}
231 517 494 if (defined $_i) { }
235 391 126 if ($_seq and $^O eq 'linux' and eval ' Socket::SOCK_SEQPACKET() ') { }
237 0 391 unless (socketpair $_obj->{$_r_sock}[$_i], $_obj->{$_w_sock}[$_i], 1, 5, 0)
238 0 0 unless socketpair $_obj->{$_r_sock}[$_i], $_obj->{$_w_sock}[$_i], 1, 1, 0
243 0 126 unless socketpair $_obj->{$_r_sock}[$_i], $_obj->{$_w_sock}[$_i], 1, 1, 0
247 0 517 if ($^O ne "aix" and $^O ne "linux")
258 465 29 if ($_seq and $^O eq 'linux' and eval ' Socket::SOCK_SEQPACKET() ') { }
260 0 465 unless (socketpair $_obj->{$_r_sock}, $_obj->{$_w_sock}, 1, 5, 0)
261 0 0 unless socketpair $_obj->{$_r_sock}, $_obj->{$_w_sock}, 1, 1, 0
266 0 29 unless socketpair $_obj->{$_r_sock}, $_obj->{$_w_sock}, 1, 1, 0
270 0 494 if ($^O ne "aix" and $^O ne "linux")
286 0 0 if not defined $_timeout and $_sock_ready{"$_socket"} > 1
290 0 0 if (not defined $_timeout) { }
294 0 0 if $_timeout < 0
295 0 0 if $_timeout
302 0 0 if $_val_bytes ne $_zero_bytes
303 0 0 if $_timeout and &MCE::Util::time() > $_timeout
306 0 0 if $_delay
307 0 0 if &MCE::Util::time() - $_start > "0.03"
313 0 0 if $_sock_ready{"${_socket}_w"} > 1
320 0 0 if select(undef, $_vec, undef, 0) > 0
332 1278 0 @_ == 3 ? :
0 1278 unless (@_ == 3 ? sysread($_[0], $_[1], $_[2]) : sysread($_[0], $_[1], $_[2], $_[3]))
333 0 0 if $! == 4
345 0 0 @_ == 3 ? :
0 0 unless ($_bytes = @_ == 3 ? sysread($_[0], $_[1], $_[2]) : sysread($_[0], $_[1], $_[2], $_[3]))
346 0 0 unless (defined $_bytes)
347 0 0 if $! == 4
350 0 0 if ($! == 11 or $! == 11)
351 0 0 if $_delay
354 0 0 unless $_start
355 0 0 if &MCE::Util::time() - $_start > "0.03"
366 0 1194 if ($^O eq 'MSWin32') { }
368 0 0 $_[1] ? :
372 597 597 $_[1] ? :
394 0 0 if $seconds < 0
396 0 0 if ($INC{'Coro/AnyEvent.pm'}) { }
0 0 elsif (&Time::HiRes::d_nanosleep) { }
0 0 elsif (&Time::HiRes::d_usleep) { }