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