| blib/lib/YATT/Lite/Test/TestFCGI.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 0 | 12 | 0.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 35 | 0 | 0 | 0 | ref $self and not -x $self->{'cf_fcgiscript'} |
| 86 | 0 | 0 | 0 | do { not $self->{'kidpid'} } && do { die "kid: Can't reopen STDIN: $!" unless open STDIN, '<&', $sock; die "kid: Can't reopen STDOUT: $!" unless open STDOUT, '>&', $sock; my(@opts) = '-T'; if (my $switch = $ENV{'HARNESS_PERL_SWITCHES'}) { push @opts, split(' ', $switch, 0); }; exec $^X, @opts, $self->{'cf_fcgiscript'}; die "Can't exec $self->{'cf_fcgiscript'}: $!" } |
| 289 | 0 | 0 | 0 | defined $self->{'raw_error'} and $self->{'raw_error'} ne '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 126 | 0 | 0 | 0 | $self->{'cookie_jar'} //= do { require HTTP::Cookies; 'HTTP::Cookies'->new } |