| line |
true |
false |
branch |
|
33
|
16 |
934 |
if (@_) |
|
34
|
1 |
15 |
if (@_ % 2) |
|
38
|
14 |
1 |
if (defined $args{'BlockSize'}) |
|
40
|
1 |
13 |
if $self->[3] <= 0 |
|
43
|
1 |
13 |
if (keys %args) |
|
59
|
105 |
0 |
if eval {
do {
require bytes
}
} |
|
66
|
427 |
47 |
if ($self->[4] and not $old_queue_octets) |
|
83
|
1598 |
778 |
if $result |
|
103
|
714 |
64 |
if (defined $result) |
|
109
|
51 |
13 |
if $! == 11 or $! == 11 |
|
121
|
105 |
0 |
if eval {
do {
require bytes
}
} |
|
137
|
417 |
18 |
if defined $wrote_count |
|
139
|
18 |
417 |
unless ($wrote_count) |
|
140
|
17 |
1 |
if $! == 11 or $! == 11 |
|
146
|
400 |
17 |
unless ($self->[2] -= $wrote_count) |
|
148
|
36 |
364 |
if (@{$self->[0];}) { } |