| line |
true |
false |
branch |
|
38
|
1000 |
456 |
unless $v |
|
40
|
0 |
456 |
unless exists $_TMPFILE_FLAG{$v} |
|
58
|
38 |
1484 |
$args{'serve'} ? : |
|
91
|
0 |
1423 |
if length $leftover |
|
98
|
1 |
1422 |
unless ($self->{'_ready'}) |
|
102
|
0 |
1 |
unless defined $chunk and length $chunk |
|
106
|
1 |
0 |
length $err ? : |
|
126
|
23 |
4278 |
defined $stdin_fh ? : |
|
130
|
28 |
84 |
if ($in_fd >= 0 and not $self->{'_stdin_eof_sent'} and $self->{'_stdin_credits'} > 0) |
|
136
|
8187 |
28 |
if (fileno $fh == $out_fd) { } |
|
|
28 |
0 |
elsif (fileno $fh == $in_fd) { } |
|
138
|
1 |
8186 |
unless (defined $data) |
|
151
|
1422 |
9005 |
if ($type == 1) { } |
|
|
1471 |
7534 |
elsif ($type == 32) { } |
|
|
2892 |
4642 |
elsif ($type == 33) { } |
|
|
1721 |
2921 |
elsif ($type == 48) { } |
|
|
31 |
2890 |
elsif ($type == 64) { } |
|
|
2 |
2888 |
elsif ($type == 97) { } |
|
|
1456 |
1432 |
elsif ($type == 80) { } |
|
|
10 |
1422 |
elsif ($type == 224) { } |
|
|
1422 |
0 |
elsif ($type == 240) { } |
|
154
|
1177 |
294 |
if ($stream == 2) { } |
|
|
294 |
0 |
elsif ($stream == 3) { } |
|
167
|
1721 |
0 |
if ($stream == 1) |
|
168
|
1424 |
297 |
if ($self->{'_no_stdin'} and not $self->{'_stdin_eof_sent'}) { } |
|
174
|
269 |
28 |
if defined $self->{'_stdin_str'} |
|
181
|
0 |
31 |
if $self->{'serve'} and not $self->{'_mod_srv'} |
|
182
|
28 |
3 |
$self->{'serve'} && $self->{'_mod_srv'} ? : |
|
183
|
16 |
15 |
if (defined $source) { } |
|
213
|
9 |
260 |
if (not length $self->{'_stdin_str'} || $self->{'_stdin_eof_sent'}) |
|
223
|
0 |
28 |
if (not defined $bytes) { } |
|
|
23 |
5 |
elsif ($bytes == 0) { } |
|
256
|
7 |
1449 |
exists $opts{'tmpfile'} ? : |
|
258
|
3 |
1453 |
$warnings ? : |
|
260
|
5 |
992 |
if (not $flags and $self->{'data_warn'} and $source =~ /^__DATA__(?:\r?\n|$)/mu) |
|
267
|
1424 |
32 |
if (not defined $stdin) { } |
|
|
9 |
23 |
elsif (not ref $stdin) { } |
|
282
|
21 |
1435 |
$opts{'args'} ? : |
|
288
|
45 |
1401 |
wantarray ? : |
|
302
|
0 |
1422 |
if $self->{'_done'} |
|
304
|
1422 |
0 |
unless $self->{'_done'} |
|
318
|
0 |
1400 |
unless $self->{'_done'} |