| line |
true |
false |
branch |
|
171
|
0 |
190 |
unless ($concrete_name) |
|
178
|
0 |
190 |
unless (eval "require $concrete_name;") |
|
204
|
0 |
58 |
unless ($self) |
|
234
|
0 |
125 |
unless $self->decode_it($in, $out) |
|
259
|
8 |
58 |
$self->encoding eq 'quoted-printable' ? : |
|
|
0 |
66 |
unless $self->encode_it($in, $out, $self->encoding eq 'quoted-printable' ? $textual_type : ()) |
|
292
|
58 |
2 |
if @_ > 1 |
|
325
|
0 |
0 |
defined $decoder ? : |
|
432
|
0 |
0 |
unless (defined $read or defined $write) |
|
439
|
6 |
6 |
if (my $fh = shift @$read) |
|
440
|
4 |
2 |
if ($fh->sysread(my $buf, 1024)) { } |
|
449
|
6 |
6 |
if (my $fh = shift @$write) |
|
450
|
4 |
2 |
if ($in->read(my $buf, 1024)) { } |
|
464
|
2 |
10 |
unless $rsel->count or $wsel->count |
|
468
|
0 |
2 |
unless waitpid($kidpid, 0) == $kidpid |
|
470
|
0 |
2 |
unless $? == 0 |