| line |
true |
false |
branch |
|
35
|
0 |
0 |
if $INC{'threads.pm'} |
|
39
|
0 |
2 |
unless (defined $INC{'MCE/Shared.pm'}) |
|
49
|
3 |
0 |
if (ref $_[0] eq "ARRAY") |
|
54
|
2 |
0 |
if $_reset_flg and $INC{'MCE/Shared/Server.pm'} |
|
61
|
0 |
0 |
if (@_) |
|
62
|
0 |
0 |
if (not defined wantarray) { } |
|
63
|
0 |
0 |
unless $fh->OPEN(@_) |
|
65
|
0 |
0 |
unless $fh->OPEN(@_) |
|
82
|
0 |
0 |
if defined fileno $_[0] |
|
83
|
0 |
0 |
binmode($_[0], $_[1] // ':raw') ? : |
|
89
|
0 |
0 |
if defined fileno $_[0] |
|
91
|
0 |
0 |
if (@_ == 3 and ref $_[2] and defined(my $_fd = fileno $_[2])) { } |
|
95
|
0 |
0 |
@_ == 2 ? : |
|
101
|
0 |
0 |
if $ret |
|
107
|
0 |
0 |
if defined $_[0] and $_[0] eq "MCE::Shared::Handle" |
|
111
|
0 |
0 |
if (ref $_[0] eq 'GLOB' and tied *{$_[0];} and ref tied *{$_[0];} eq 'MCE::Shared::Handle') { } |
|
|
0 |
0 |
elsif (@_) { } |
|
116
|
0 |
0 |
if (ref $_[0] eq "GLOB" and tied *{$_[0];}) |
|
117
|
0 |
0 |
if defined fileno $_[0] |
|
123
|
0 |
0 |
unless @_ |
|
125
|
0 |
0 |
if (not defined wantarray) { } |
|
126
|
0 |
0 |
unless $item->OPEN(@_) |
|
135
|
0 |
0 |
if (lc substr($len, -1, 1) eq 'm') { } |
|
|
0 |
0 |
elsif (lc substr($len, -1, 1) eq 'k') { } |
|
143
|
0 |
0 |
unless ($auto) |
|
144
|
0 |
0 |
@_ == 4 ? : |
|
153
|
0 |
0 |
if (not eof $fh) { } |
|
154
|
0 |
0 |
if (length $/ > 1 and substr($/, 0, 1) eq "\n") { } |
|
|
0 |
0 |
elsif (defined($ret = read($fh, $tmp, $len))) { } |
|
157
|
0 |
0 |
if (tell $fh) { } |
|
164
|
0 |
0 |
if (defined $ret) |
|
165
|
0 |
0 |
if eof $fh |
|
168
|
0 |
0 |
if substr($tmp, -$len) eq substr($/, 1) |
|
173
|
0 |
0 |
if eof $fh |
|
181
|
0 |
0 |
if (defined $ret) { } |
|
195
|
0 |
0 |
if (length $/ > 1 and substr($/, 0, 1) eq "\n" and not eof $_[0]) { } |
|
198
|
0 |
0 |
if (tell $_[0]) { } |
|
204
|
0 |
0 |
if substr($buf, -$len) eq substr($/, 1) |
|
216
|
0 |
0 |
defined $, ? : |
|
217
|
0 |
0 |
if defined $\ |
|
242
|
0 |
0 |
@_ == 3 ? : |
|
|
0 |
0 |
@_ == 2 ? : |
|
|
0 |
0 |
unless ($wrote += @_ == 2 ? syswrite($_[0], $_[1], length($_[1]) - $wrote, $wrote) : (@_ == 3 ? syswrite($_[0], $_[1], $_[2] - $wrote, $wrote) : syswrite($_[0], $_[1], $_[2] - $wrote, $_[3] + $wrote))) |
|
243
|
0 |
0 |
unless (defined $wrote) |
|
244
|
0 |
0 |
if $!{'EINTR'} or $!{'EAGAIN'} or $!{'EWOULDBLOCK'} |
|
482
|
0 |
0 |
if exists $_function->{$key} |
|
528
|
0 |
9 |
unless defined $_[0] |
|
530
|
0 |
9 |
if (ref $_[-1] and &reftype($_[-1]) ne 'GLOB') { } |
|
|
0 |
9 |
elsif (@_ == 1 and ref $_[0] and defined($_fd = fileno $_[0])) { } |
|
|
0 |
9 |
elsif (@_ == 2 and ref $_[1] and defined($_fd = fileno $_[1])) { } |
|
|
9 |
0 |
elsif (not ref $_[-1]) { } |
|
540
|
0 |
9 |
$_[-1] =~ /&=(\d+)$/ ? : |
|
547
|
0 |
9 |
if ($_fd > $_max_fd and not $INC{'IO/FDPass.pm'}) |
|
554
|
0 |
9 |
if defined $\ |
|
555
|
0 |
9 |
if $/ ne $LF |
|
562
|
0 |
9 |
$_is_MSWin32 ? : |
|
568
|
0 |
9 |
if $_fd > $_max_fd |
|
571
|
9 |
0 |
unless $_is_MSWin32 |
|
574
|
0 |
9 |
if $MCE::Signal::SIG |
|
576
|
0 |
9 |
if ($_err) { } |
|
586
|
0 |
7 |
if defined $\ |
|
593
|
0 |
7 |
$_is_MSWin32 ? : |
|
598
|
0 |
7 |
if $/ ne $LF |
|
602
|
7 |
0 |
if ($_len and $_len > 0) |
|
607
|
1 |
6 |
if (defined $_[3]) { } |
|
617
|
7 |
0 |
unless $_is_MSWin32 |
|
620
|
0 |
7 |
if $MCE::Signal::SIG |
|
622
|
6 |
1 |
if ($_len) { } |
|
623
|
0 |
6 |
if ($_len < 0) |
|
630
|
0 |
1 |
if (defined $_[3]) { } |
|
644
|
0 |
29 |
if defined $\ |
|
651
|
0 |
29 |
$_is_MSWin32 ? : |
|
656
|
0 |
29 |
if $/ ne $LF |
|
660
|
27 |
2 |
if ($_len and $_len > 0) |
|
664
|
29 |
0 |
unless $_is_MSWin32 |
|
667
|
0 |
29 |
if $MCE::Signal::SIG |
|
669
|
0 |
29 |
if ($_len and $_len < 0) |
|
675
|
27 |
2 |
$_buf ? : |
|
681
|
0 |
212 |
defined $, ? : |
|
683
|
0 |
212 |
if defined $\ |
|
685
|
212 |
0 |
if (length $_buf) { } |
|
698
|
10 |
0 |
if (length $_buf) { } |
|
709
|
0 |
1 |
if defined $\ |
|
710
|
0 |
1 |
if $/ ne $LF |
|
717
|
0 |
1 |
$_is_MSWin32 ? : |
|
719
|
1 |
0 |
if (@_ == 1 or @_ == 2 and $_[1] == length $_[0]) { } |
|
731
|
1 |
0 |
unless $_is_MSWin32 |
|
734
|
0 |
1 |
if $MCE::Signal::SIG |
|
736
|
1 |
0 |
length $_ret ? : |