| blib/lib/Mojolicious/Plugin/CGI.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 41 | 62 | 66.1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 37 | 41 | 0 | 2 | $args->{'support_semicolon_in_query_string'} and not $app->{'mojolicious_plugin_cgi.before_dispatch'}++ |
| 173 | 0 | 36 | 36 | $args->{'pids'}{$pid} and kill 0, $pid |
| 36 | 0 | 36 | $args->{'pids'}{$pid} and kill 0, $pid and $GUARD-- |
| line | l | !l | condition |
|---|---|---|---|
| 13 | 0 | 34 | $ENV{'CHECK_CHILD_INTERVAL'} || 0.01 |
| 26 | 6 | 37 | $app->{'mojolicious_plugin_cgi.pids'} ||= {} |
| 61 | 1 | 0 | open STDIN, '<', $stdin->path or die "STDIN @{[$stdin->path];}: $!" |
| 71 | 20 | 0 | $args->{'script'} || die("Could not execute $args->{'script'}: $!") |
| 125 | 1 | 19 | $content_length || 0 |
| 1 | 19 | $headers->content_type || '' | |
| 20 | 0 | $c->stash('path_info') // '' | |
| 20 | 0 | gethostbyaddr(inet_aton($tx->remote_address || '127.0.0.1'), 2) || '' | |
| 2 | 18 | $remote_user || '' | |
| 20 | 0 | $args->{'script'} || '' | |
| 0 | 20 | $ENV{'USER'} || '' | |
| 170 | 36 | 0 | unlink $stdin->path or die "Could not remove STDIN @{[$stdin->path];}" |
| 251 | 36 | 0 | delete $pids->{$pid} || 'unknown' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 29 | 6 | 37 | 0 | $args->{'env'} ||= $self->env |
| 35 | 6 | 37 | 0 | $app->{'mojolicious_plugin_cgi.tid'} ||= 'Mojo::IOLoop'->recurring(0.01, sub { local($?, $!); _waitpids($pids); } ) |
| 48 | 2 | 35 | 0 | $args->{'run'} or $args->{'script'} |
| 51 | 35 | 0 | 0 | 'File::Spec'->rel2abs($args->{'script'}) || $args->{'script'} |
| 125 | 1 | 4 | 15 | $c->stash('cgi.query_string') || $req->url->query->to_string |
| 20 | 0 | 0 | $script_name || $args->{'name'} | |
| 136 | 0 | 2 | 54 | $args->{'before'} || $defaults->{'before'} |
| 141 | 9 | 155 | 116 | $args->{$_} ||= $defaults->{$_} |
| 149 | 32 | 4 | 0 | $args->{'script'} || $args->{'run'} |