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 } |