Branch Coverage

blib/lib/IPC/Run.pm
Criterion Covered Total %
branch 589 972 60.6


line true false branch
1206 0 231 if ($] < "5.008")
1217 0 231 if (&Win32_MODE()) { }
1218 0 0 unless eval "use IPC::Run::Win32Helper; 1;" or $@ and die
1223 0 231 unless eval "use File::Basename; 1;"
1281 0 3719 unless defined $IPC::Run::cur_self
1283 0 3719 if (&_debugging() and not defined $IPC::Run::cur_self->{'DEBUG_FD'})
1284 0 0 if (defined $stderr_fd)
1289 0 0 if &_debugging_details()
1294 3719 0 unless defined $IPC::Run::cur_self->{'DEBUG_FD'}
1304 0 2470 if defined $self->{'DEBUG_FD'}
1345 1 2148 unless defined $cmd_name and length $cmd_name
1347 1711 437 if ("File::Spec"->file_name_is_absolute($cmd_name) and -x $cmd_name)
1348 0 1711 if &_debugging_details()
1353 0 432 $^O =~ /VMS/ ? :
0 432 $^O =~ /MacOS/ ? :
5 432 &Win32_MODE() ? :
1360 5 0 if (&Win32_MODE() and $cmd_name =~ /$dirsep/ and not $cmd_name =~ m[\.[^\\/\.]+$])
1364 0 5 if &_debugging()
1367 5 7 if -f $name and -x _
1369 0 5 if &_debugging()
1372 6 431 if ($cmd_name =~ /($dirsep)/)
1373 0 6 if &_debugging()
1374 1 5 unless -e $cmd_name
1375 0 5 unless -f $cmd_name
1376 0 5 unless -x $cmd_name
1382 430 1 defined $ENV{'PATH'} ? :
1383 103 328 if ($current_path ne $_cmd_cache_path)
1384 0 103 if &_debugging()
1389 328 103 if (exists $cmd_cache{$cmd_name})
1390 0 328 if &_debugging()
1392 328 0 if -x $cmd_cache{$cmd_name}
1393 0 0 if &_debugging()
1403 0 103 &Win32_MODE() ? :
1407 0 630 unless length $_
1415 0 630 &Win32_MODE() && !(-f $prospect && -x _) ? :
1419 102 528 if (-f $found and -x _)
1426 102 1 if (exists $cmd_cache{$cmd_name})
1427 0 102 if &_debugging_details()
1439 0 0 unless (defined $operand)
1444 0 0 if (not $ref) { }
0 0 elsif ($ref eq 'ARRAY') { }
0 0 elsif (UNIVERSAL::isa($operand, 'IPC::Run::Win32Process')) { }
1445 0 0 length $operand < 50 ? :
1451 0 0 /[^\w.-]/ ? :
1466 0 12283 unless defined $_[0]
1467 12283 0 $_[0] =~ /^\d+$/ ? :
1468 0 12283 if (&Win32_MODE())
1490 0 0 if (not defined $nul_fd) { }
1491 0 0 if &_debugging_details()
1495 0 0 if &_debugging_details() and not defined $r
1498 0 0 if &_debugging_details() and not defined $r
1503 12212 71 $r ? :
1505 0 12283 if &_debugging_details()
1509 0 2279 unless defined $_[0]
1511 0 2279 unless defined $r
1512 0 2279 if $r eq "0 but true"
1513 0 2279 if &_debugging_details()
1519 0 365 unless defined $_[0] and defined $_[1]
1521 0 365 unless defined $r
1522 124 241 if $r eq "0 but true"
1523 0 365 if &_debugging_details()
1529 0 183 if grep((!defined($_)), @_)
1532 0 183 if &_debugging_details()
1555 0 264 unless defined $_[0] and defined $_[1]
1556 0 264 if &_debugging_details()
1564 22 242 unless defined $r
1565 0 242 if &_debugging_data()
1576 0 5353 unless defined $r
1577 0 5353 if &_debugging_details()
1589 0 1138 unless defined $f
1591 0 1138 if &_debugging_details()
1592 1138 0 unless (&Win32_MODE())
1596 0 1138 unless $fres
1597 0 1138 if &_debugging_details()
1600 0 1138 if &_debugging_details()
1607 0 35 unless $pty
1609 0 35 unless $pty->blocking(0)
1610 0 35 if &_debugging_details()
1617 0 6752 unless defined $_[0]
1623 21 6731 unless defined $r
1625 0 6731 if &_debugging_data()
1635 0 2403 if UNIVERSAL::isa($kid->{'VAL'}, "IPC::Run::Win32Process")
1637 0 2403 if &_debugging_details()
1646 346 2057 if (ref $kid->{'VAL'} eq "CODE")
1651 0 2403 unless defined $kid->{'PID'}
1653 186 2217 unless ($kid->{'PID'})
1654 0 186 if ($self->{'_sigusr1_after_fork'})
1662 3 183 if defined $coderef_err_reader_fd
1667 0 2217 if &_debugging_details()
1670 343 1874 if (defined $self->{'CODEREF_ERR_FD'})
1680 2 2215 if (not defined $sync_pulse or length $sync_pulse)
1681 2 0 if (waitpid($kid->{'PID'}, 0) >= 0) { }
1687 0 2 unless length $sync_pulse
1695 0 901 unless defined $_[0] and defined $_[1]
1697 231 670 unless (defined $r)
1698 231 0 if $! == 32
1699 0 0 if $! == 11
1702 0 670 if &_debugging_data()
1741 45 1812 if ($@)
1801 0 69 unless @_
1803 0 69 if @_ > 1
1806 0 69 unless defined $signal
1808 0 28 if &_debugging()
1811 0 28 unless kill $signal, $_->{'PID'}
1865 62 1 unless defined $grace
1869 63 0 unless defined $coup_d_grace
1872 0 63 if keys %options
1876 0 63 if (&Win32_MODE()) { }
1897 63 9 unless $self->_running_kids
1899 2 7 if ($accum_delay >= $grace * "0.8")
1901 1 1 if (time >= $quitting_time)
1902 1 0 unless ($have_killed_before)
1915 3 5 if $delay >= "0.5"
1954 0 2702 if (@_ and ref $_[-1] eq "HASH")
1964 105 2597 if (@_ == 1 and not ref $_[0]) { }
101 2496 elsif (@_ > 1 and not grep(ref($_), @_)) { }
1965 0 105 if (&Win32_MODE()) { }
1978 37 11817 if (not defined $_) { }
1979 30 7 if (&Internals::SvREADONLY(\$_)) { }
2016 0 2702 if ($options)
2020 0 2702 if &_debugging()
2029 0 8984 if &_debugging()
2032 2641 8776 if (ref $_ eq 'ARRAY' or UNIVERSAL::isa($_, 'IPC::Run::Win32Process') or not $cur_kid and ref $_ eq 'CODE') { }
2 8774 elsif (UNIVERSAL::isa($_, 'IPC::Run::IO')) { }
400 8374 elsif (UNIVERSAL::isa($_, 'IPC::Run::Timer')) { }
35 8339 elsif (ref $_ eq 'IPC::Run::Undef') { }
74 8265 elsif (/^(\d*)>&(\d+)$/) { }
34 8231 elsif (/^(\d*)<&(\d+)$/) { }
43 8188 elsif (/^(\d*)<&-$/) { }
1408 6780 elsif (/^(\d*) (
2852 3928 elsif (/^() (>>?) (&) () (.*)$/x or /^() (&) (>pipe) () () $/x or /^() (>pipe)(&) () () $/x or /^(\d*)() (>pipe) () () $/x or /^() (&) (>pty) ( \w*)> () $/x or /^(\d*)() (>pty) ( \w*)> () $/x or /^() (&) (>>?) () (.*)$/x or /^(\d*)() (>>?) () (.*)$/x) { }
33 3895 elsif ($_ eq '|') { }
44 3851 elsif ($_ eq '&') { }
89 3762 elsif ($_ eq 'init') { }
10 3752 elsif ($_ eq 'env') { }
1319 2433 elsif (not ref $_) { }
0 2433 elsif (ref $_ eq 'IPC::Run::Undef') { }
0 2433 elsif ($_ eq 'init') { }
2433 0 elsif ($succinct and $first_parse) { }
2035 0 2641 if $cur_kid
2036 0 2641 if &Win32_MODE() and ref $_ eq "CODE"
2038 3 2292 if ref $_ eq "ARRAY" and @$_ and not defined $_->[0]
2049 34 2604 if $next_kid_close_stdin
2077 10 64 unless $cur_kid
2078 64 0 length $1 ? :
2083 0 64 if &_debugging_details()
2088 10 24 unless $cur_kid
2089 24 0 length $1 ? :
2098 20 23 unless $cur_kid
2099 23 0 length $1 ? :
2110 20 1388 unless $cur_kid
2116 1000 388 length $1 ? :
2119 14 1374 if ($type eq "
2120 0 14 length $3 ? :
2133 1327 61 unless (length $source)
2134 387 940 unless ($succinct)
2137 42 22 if (UNIVERSAL::isa($args[0], 'IPC::Run::binmode_pseudo_filter')) { }
2146 0 1327 if &_empty($source)
2149 0 1327 if &_debugging_details() and @filters
2156 66 96 if (ref $source eq 'GLOB' || UNIVERSAL::isa($source, 'IO::Handle') and not $type =~ /^
2166 0 66 if (defined $fno and $fno <= 2)
2167 0 0 if &_debugging_details()
2170 0 66 if &Win32_MODE()
2186 30 2822 unless $cur_kid
2190 27 2733 $2 eq '>pty' || $3 eq '>pty' ? :
62 2760 $2 eq '>pipe' || $3 eq '>pipe' ? :
2195 1910 912 length $1 ? :
2197 0 27 length $4 ? :
27 2795 $2 eq '>pty' || $3 eq '>pty' ? :
2213 2625 197 unless (length $dest)
2214 1132 1493 unless ($succinct)
2218 49 26 if (UNIVERSAL::isa($args[0], 'IPC::Run::binmode_pseudo_filter')) { }
2227 2 2623 if (@args and ref $args[0] eq 'IPC::Run::Undef') { }
2237 0 2625 if &_debugging_details() and @filters
2241 27 2598 if ($type eq ">pty>")
2250 0 2822 if &_empty($dest)
2254 60 2762 if (UNIVERSAL::isa($dest, 'GLOB') || UNIVERSAL::isa($dest, 'IO::Handle') and not $type =~ /^>(pty>|pipe)$/)
2256 0 60 if &_debugging_details()
2260 50 2772 if $stderr_too
2268 10 23 unless $cur_kid
2279 10 34 unless $cur_kid
2287 0 89 unless $cur_kid
2295 0 10 unless $cur_kid
2297 1 9 unless ref $env eq "HASH"
2312 0 0 unless $cur_kid
2323 940 1493 if (not $assumed_fd) { }
2329 0 2433 if &_debugging_details()
2336 0 0 ref $_ ? :
2345 114 8870 if ($@)
2347 0 114 if &_debugging()
2352 114 2588 if @errs
2376 0 36 if &_debugging_details()
2381 1 35 if ($@)
2383 0 1 if &_debugging()
2389 0 2 if ($@) { }
2391 0 0 if &_debugging()
2401 2144 346 if (ref $kid->{'VAL'} eq "ARRAY")
2404 23 2464 if (defined $pipe_read_fd)
2405 0 23 if &_debugging_details()
2419 1262 3253 if ($op->{'TYPE'} eq '<') { }
98 3155 elsif ($op->{'TYPE'} eq '{'TYPE'} eq '
14 3141 elsif ($op->{'TYPE'} eq '
2728 413 elsif ($op->{'TYPE'} eq '>') { }
61 352 elsif ($op->{'TYPE'} eq '>pipe') { }
27 325 elsif ($op->{'TYPE'} eq '>pty>') { }
23 302 elsif ($op->{'TYPE'} eq '|') { }
0 302 elsif ($op->{'TYPE'} eq '&') { }
2421 83 1179 if (not ref $source) { }
66 1113 elsif (UNIVERSAL::isa($source, 'GLOB') or UNIVERSAL::isa($source, 'IO::Handle')) { }
1032 81 elsif (UNIVERSAL::isa($source, 'SCALAR')) { }
71 10 elsif (UNIVERSAL::isa($source, 'CODE')) { }
2424 0 83 if &_debugging_details()
2427 10 73 if $self->{'_simulate_open_failure'}
2433 0 66 unless defined fileno $source
2439 0 66 if &_debugging_details()
2444 0 1032 if &_debugging_details()
2454 0 71 if &_debugging_details()
2470 0 98 if &_debugging_details()
2475 0 0 ref $op->{'SOURCE'} eq 'SCALAR' ? :
0 98 if &_debugging_details()
2483 0 14 if &_debugging_details()
2487 14 0 if (UNIVERSAL::isa($source, 'SCALAR')) { }
0 0 elsif (UNIVERSAL::isa($source, 'CODE')) { }
2490 0 14 if &_debugging_details()
2499 0 0 if &_debugging_details()
2515 201 2527 if (not ref $dest) { }
60 2467 elsif (UNIVERSAL::isa($dest, 'GLOB')) { }
2341 126 elsif (UNIVERSAL::isa($dest, 'SCALAR')) { }
116 10 elsif (UNIVERSAL::isa($dest, 'CODE')) { }
2519 0 0 $op->{'TRUNC'} ? :
0 201 if &_debugging_details()
2523 10 191 if $self->{'_simulate_open_failure'}
2526 151 40 $op->{'TRUNC'} ? :
2528 0 191 if (&Win32_MODE())
2537 0 60 unless defined fileno $dest
2544 0 60 if &_debugging_details()
2547 0 2341 if &_debugging_details()
2551 2341 0 if $op->{'TRUNC'}
2554 0 116 if &_debugging_details()
2571 0 61 if &_debugging_details()
2576 0 0 ref $op->{'DEST'} eq 'SCALAR' ? :
0 61 if &_debugging_details()
2586 27 0 if (UNIVERSAL::isa($dest, 'SCALAR')) { }
0 0 elsif (UNIVERSAL::isa($dest, 'CODE')) { }
2589 0 27 if &_debugging_details()
2592 27 0 if $op->{'TRUNC'}
2597 0 0 if &_debugging_details()
2610 0 23 if &_debugging_details()
2612 0 23 if (&Win32_MODE())
2623 63 4452 unless ($ok)
2625 0 63 if &_debugging()
2630 63 2369 if (@errs)
2636 1 0 unless $self->{'PTYS'}{$_}
2658 30 56 unless defined $_
2662 0 56 if &_debugging_details()
2679 3654 830 if (defined $_->{'FD'})
2683 0 3654 if &_debugging_details()
2684 1116 2538 $_->{'TYPE'} =~ /^
2694 1 1 if $io->mode =~ /r/
2695 1 1 if $io->mode =~ /w/
2706 2539 1117 if ($pipe->{'TYPE'} =~ /^>/) { }
2710 0 4192 unless defined $pipe->{'FD'}
2711 0 4192 unless vec $self->{'ROUT'}, $pipe->{'FD'}, 1
2715 0 4192 if &_debugging_details()
2717 21 4171 if ($@)
2722 0 0 unless $@ =~ /$IPC::Run::_EIO/ or $@ =~ /input or output/ and $^O =~ /aix/ or &Win32_MODE() and $@ =~ /Bad file descriptor/
2728 2242 1950 unless (length $in)
2746 0 3181 unless defined $pipe->{'FD'}
2749 0 1651 unless vec $self->{'WOUT'}, $pipe->{'FD'}, 1 or $pipe->{'PAUSED'}
2753 3167 14 unless (length $$in_ref)
2754 706 2461 unless (defined &get_more_input())
2760 1574 901 unless (length $$in_ref)
2761 85 1489 unless ($pipe->{'PAUSED'})
2762 0 85 if &_debugging_details()
2771 0 901 if &_debugging_details()
2773 901 0 if (length $$in_ref) { }
2775 231 670 unless (defined $c)
2778 0 231 if &_debugging_details()
2806 51 919 unless defined $_->{'TFD'}
2807 2 917 if $_->{'TFD'} == $fd2
2809 0 365 if (defined $self->{'DEBUG_FD'} and $self->{'DEBUG_FD'} == $fd2)
2834 0 7 unless POSIX::setsid()
2835 0 7 if &_debugging_details()
2847 0 186 if ($] < "5.008")
2867 0 186 if (&_debugging())
2871 0 0 ref $kid->{'VAL'} eq 'CODE' ? :
2879 146 40 unless ($self->{'noinherit'})
2882 3 183 if defined $self->{'CODEREF_ERR_FD'}
2883 0 186 if defined $self->{'DEBUG_FD'}
2894 7 179 if (%{$self->{'PTYS'};})
2897 0 7 if &_debugging_details()
2911 8 397 if ($_->{'TYPE'} =~ /^.pty.$/)
2921 0 186 if &_debugging_details()
2925 3 183 if ($kid->{'ENV'})
2932 353 21 if (defined $_->{'TFD'}) { }
12 9 elsif ($_->{'TYPE'} eq 'dup') { }
6 3 elsif ($_->{'TYPE'} eq 'close') { }
3 0 elsif ($_->{'TYPE'} eq 'init') { }
2937 1 352 if ($_->{'TFD'} == $_->{'KFD'}) { }
2949 12 0 unless $_->{'KFD1'} == $_->{'KFD2'}
2954 5 1 if ($fds{$_})
2967 183 3 if (ref $kid->{'VAL'} ne "CODE")
2968 0 183 unless open $s1, ">&=$self->{'SYNC_WRITER_FD'}"
2972 0 183 if (defined $self->{'DEBUG_FD'})
2973 0 0 unless open $s2, ">&=$self->{'DEBUG_FD'}"
2978 0 183 if (&_debugging())
2980 0 0 if (/[\s\"]/) { }
2984 0 183 if $self->{'_simulate_exec_failure'}
2991 0 3 if ($@)
3000 0 3 if &_debugging()
3001 0 3 if defined $self->{'DEBUG_FD'}
3021 0 0 if ($kid_err)
3022 0 0 if (defined $self->{'CODEREF_ERR_FD'})
3030 0 0 if defined $self->{'CODEREF_ERR_FD'}
3092 0 2548 if (@_ and ref $_[-1] eq "HASH")
3099 75 2473 if (@_ == 1 and UNIVERSAL::isa($_[0], __PACKAGE__)) { }
3104 0 2473 $options ? :
3109 4 2431 if $self->{'STATE'} == 3
3111 0 2435 if &_debugging()
3120 0 0 if &Win32_MODE() and $IPC::Run::in_run
3127 0 404 if ($@)
3129 0 0 if &_debugging()
3134 66 2369 if ($@)
3136 0 66 if &_debugging()
3139 2369 66 unless (@errs)
3150 0 2413 if &_debugging_details()
3152 10 2403 if ($self->{'_simulate_fork_failure'})
3156 0 2403 if (&Win32_MODE()) { }
3169 0 0 if $kid->{'PATH'} and &_debugging()
3178 0 0 ref $kid->{'VAL'} eq 'ARRAY' ? :
3179 0 0 if &_debugging()
3180 0 0 if ($self->{'_sleep_after_win32_spawn'})
3182 0 0 if &_debugging()
3187 12 2215 if ($@)
3189 0 12 if &_debugging()
3196 1 28 unless $pty
3208 3721 57 if defined $_->{'TFD'} and not $_->{'DONT_CLOSE'} and not $closed[$_->{'TFD'}]
3209 0 4168 if ($@)
3211 0 0 if &_debugging()
3213 3721 447 if ($close_it or $@)
3221 63 3658 if (defined $_->{'TYPE'} and $_->{'TYPE'} eq '<' and ref $_->{'SOURCE'} and UNIVERSAL::isa($_->{'SOURCE'}, 'GLOB') || UNIVERSAL::isa($_->{'SOURCE'}, 'IO::Handle')) { }
3235 0 3721 if ($@)
3237 0 0 if &_debugging()
3242 0 2249 unless defined $self->{'PIPES'}
3244 78 2171 if (@errs)
3246 0 78 if $@
3277 0 3265 if &_debugging_details()
3279 994 2271 $file->{'TYPE'} =~ /^
3284 32 3233 if ($file->{'TYPE'} =~ /^(.)pty.$/) { }
3233 0 elsif (UNIVERSAL::isa($file, 'IPC::Run::IO')) { }
3285 21 11 if ($1 eq ">")
3289 0 21 if &_debugging_details()
3291 21 0 if defined $self->{'PTYS'}{$file->{'PTY_ID'}}
3296 3233 0 unless $file->{'DONT_CLOSE'}
3329 3281 2 unless $SIG{'CHLD'} and $SIG{'CHLD'} ne "DEFAULT"
3339 3282 1 unless $SIG{'PIPE'} and $SIG{'PIPE'} ne "DEFAULT"
3348 401 3338 if ($io_occurred and $self->{'break_on_io'})
3349 0 401 if &_debugging_details()
3354 1413 9379 $self->{'non_blocking'} ? :
3356 1764 9028 if (@{$self->{'TIMERS'};})
3360 0 1764 unless $_->is_running
3363 0 1754 if defined $time_left and not $time_left
3364 1250 504 if not defined $timeout or $time_left < $timeout
3375 17356 1558 unless $file->{'PAUSED'} and $file->{'TYPE'} =~ /^
3377 0 1558 if &_debugging_details()
3380 0 1558 if (defined $file->{'FD'} and not defined $did or $did) { }
3381 0 0 if &_debugging_details()
3397 0 10782 if (&_debugging_details())
3402 0 0 if vec $self->{'RIN'}, $_, 1
3403 0 0 $out ? :
0 0 if vec $self->{'WIN'}, $_, 1
3404 0 0 if not $out and vec $self->{'PIN'}, $_, 1
3405 0 0 $out ? :
0 0 if vec $self->{'EIN'}, $_, 1
3406 0 0 unless $out
3411 0 0 if &_debugging_details()
3417 0 10782 unless $p
3418 9369 1413 if ($p != 0 and !defined($timeout) || $timeout > 0.1)
3423 9369 0 if (not &Win32_MODE() or $self->{'RIN'} or $self->{'WIN'} or $self->{'EIN'}) { }
3426 2479 6890 if $not_forever >= "0.5"
3436 0 0 unless (defined $timeout or @{$self->{'PIPES'};} - $paused)
3440 0 0 if ($self->{'break_on_io'})
3441 0 0 if &_debugging()
3447 0 0 if (not &Win32_MODE() or $self->{'RIN'} or $self->{'WIN'} or $self->{'EIN'}) { }
3450 0 0 if $not_forever >= "0.5"
3457 0 0 defined $timeout ? :
0 10782 if &_debugging_details()
3461 0 10782 if (&Win32_MODE()) { }
3474 0 0 unless index(unpack("b*", $_), 1) != -1
3485 0 0 unless defined $_
3488 1339 4845 if not $nfound and $self->{'non_blocking'}
3490 125 9318 if ($nfound < 0)
3491 125 0 if ($!{'EINTR'}) { }
3506 0 9443 if (&_debugging_details())
3511 0 0 if vec $self->{'ROUT'}, $_, 1
3512 0 0 $out ? :
0 0 if vec $self->{'WOUT'}, $_, 1
3513 0 0 $out ? :
0 0 if vec $self->{'EOUT'}, $_, 1
3514 0 0 unless $out
3525 2552 12784 $_->poll($self) ? :
3534 0 2299 if &_debugging_details()
3537 22 7 unless ref $_
3539 0 7 if &_debugging_data()
3542 0 7 if $@
3544 0 7 if &_debugging_data()
3547 0 7 if $@
3550 0 2299 if &_debugging_details()
3557 76 2259 if (not defined $kid->{'PID'} && length $kid->{'PID'}) { }
3558 0 76 if &_debugging()
3562 0 109 if defined $op->{'TFD'} and not defined $op->{'TEMP_FILE_HANDLE'}
3572 343 1992 if (defined $kid->{'CODEREF_ERR_FD'})
3576 88 255 if defined $err and length $err
3579 88 2211 if @coderef_exceptions
3586 0 2335 if &_debugging_details()
3595 3881 287 if UNIVERSAL::isa($op, "IPC::Run::IO")
3600 0 2299 if &_debugging_details()
3602 0 2299 if defined $self->{'DEBUG_FD'}
3643 0 1771 unless @_ == 1 and UNIVERSAL::isa($_[0], __PACKAGE__)
3650 0 1771 if &_debugging()
3653 0 1771 if $self->{'STATE'} < 3
3654 0 1771 unless $self->pumpable
3681 0 1403 if $@
3736 0 48 unless $self->{'STATE'} >= 3
3738 0 48 if &_debugging()
3746 8 42 unless $pipe->{'TYPE'} =~ /^
3799 25798 4433 if grep((!$_->{'PAUSED'}), @{$$self{"PIPES"};})
3803 3113 1320 unless $self->_running_kids
3814 37 1283 unless $self->_running_kids
3866 0 8135 if (&Win32_MODE()) { }
3869 0 0 if not defined $kid->{'PROCESS'} or defined $kid->{'RESULT'}
3870 0 0 $nohang ? :
3871 0 0 unless ($kid->{'PROCESS'}->Wait($wait_timeout))
3872 0 0 unless $nohang
3874 0 0 if &_debugging_details()
3879 0 0 if &_debugging()
3883 0 0 unless $kid->{'PROCESS'}->GetExitCode($native_result)
3886 0 0 if (defined $native_result) { }
3892 0 0 if ($win32_full_result >> 8 != $native_result)
3903 3325 4810 if not defined $kid->{'PID'} or defined $kid->{'RESULT'}
3904 4189 621 $nohang ? :
3905 2612 2198 unless ($pid)
3906 0 2612 unless $nohang
3908 0 2612 if &_debugging_details()
3913 2 2196 if ($pid < 0) { }
3914 0 2 if &_debugging()
3918 0 2196 if &_debugging()
3922 0 2196 unless $pid == $kid->{'PID'}
3923 0 2196 if &_debugging()
3956 0 2159 @_ && ref $_[-1] eq 'HASH' ? :
3960 0 2159 if &_debugging()
3968 1506 625 if (%{$self->{'PTYS'};} or @{$self->{'PIPES'};} or @{$self->{'TIMERS'};})
3976 88 2070 if ($self->{'CODEREF_EXCEPTIONS'} and @{$self->{'CODEREF_EXCEPTIONS'};})
4015 0 2104 unless $self->{'STATE'} >= 2
4016 0 2104 unless $self->{'STATE'} == 2
4027 0 19 unless $which >= 0 and $which <= $#{$$self{"KIDS"};}
4043 10 5 if (@_) { }
4048 0 5 unless @{$self->{'KIDS'};}
4051 2 11 if $candidate
4103 9 2073 if (@_) { }
4108 2 2071 unless @{$self->{'KIDS'};}
4110 537 1568 if _numeric_result($_->{'RESULT'})
4130 0 3 unless $self->{'STATE'} >= 2
4131 0 3 unless $self->{'STATE'} == 2
4162 8 20 if (@_) { }
4168 0 8 unless $which >= 0 and $which <= $#{$$self{"KIDS"};}
4172 0 20 unless @{$self->{'KIDS'};}
4191 0 11 unless $_->{'PID'}
4237 1 1 if (@_) { }
4243 0 1 unless $which >= 0 and $which <= $#{$$self{"KIDS"};}
4247 0 1 unless @{$self->{'KIDS'};}
4339 26 65 @_ ? :
4389 3 2 if &_empty($re)
4390 4 1 unless ref $re eq "Regexp"
4396 0 56 if length $$out_ref
4444 0 1 unless defined $suffix
4469 0 116 if (@_ > 1) { }
4481 0 0 defined $$ref ? :
4483 0 0 length $$ref ? :
4493 361 637 @$ref ? :
4496 129 232 length $s ? :
4500 0 116 ref $ref eq 'SCALAR' ? :
4671 0 3109 unless defined $IPC::Run::filter_op->{'FBUFS'}[$IPC::Run::filter_num + 1]
4672 2466 643 unless length ${$IPC::Run::filter_op->{'FBUFS'}[$IPC::Run::filter_num + 1];}
4695 0 14255 unless defined $IPC::Run::filter_op->{'FILTERS'}[$IPC::Run::filter_num]
4702 0 14255 if $@