Devel-StackTrace-AsHTML
view release on metacpan or search on metacpan
eg/output.html view on Meta::CPAN
filename => "lib/Plack/Server/Standalone.pm",
hasargs => 1,
hints => 2,
is_require => undef,
lexicals => {
"\$app" => \do{my $fix},
"\$buf" => \"",
"\$conn" => \bless(Symbol::gensym(), "IO::Socket::INET"),
"\$env" => \do{my $fix},
"\$input" => \do{my $fix},
"\$is_keepalive" => \1,
"\$reqlen" => \145,
"\$res" => \[400, ["Content-Type", "text/plain"], ["Bad Request"]],
"\$rlen" => \145,
"\$self" => \bless({
host => 0,
keepalive_timeout => 2,
listen_sock => bless(Symbol::gensym(), "IO::Socket::INET"),
max_keepalive_reqs => 100,
port => 8080,
timeout => 300,
}, "Plack::Server::Standalone"),
"\$use_keepalive" => \undef,
},
line => 153,
max_arg_length => undef,
"package" => "Plack::Server::Standalone",
respect_overload => undef,
subroutine => "Plack::Util::run_app",
"wantarray" => 0,
}, "Devel::StackTrace::WithLexicals::Frame"),
bless({
args => ['fix', 'fix', 'fix', 'fix', 1, 1],
eg/output.html view on Meta::CPAN
evaltext => undef,
filename => "lib/Plack/Server/Standalone.pm",
hasargs => 1,
hints => 2,
is_require => undef,
lexicals => {
"\$app" => \do{my $fix},
"\$conn" => \do{my $fix},
"\$env" => \do{my $fix},
"\$max_reqs_per_child" => \undef,
"\$may_keepalive" => \1,
"\$proc_req_count" => \5,
"\$req_count" => \1,
"\$self" => \do{my $fix},
},
line => 111,
max_arg_length => undef,
"package" => "Plack::Server::Standalone",
respect_overload => undef,
subroutine => "Plack::Server::Standalone::handle_connection",
"wantarray" => 0,
eg/output.html view on Meta::CPAN
SERVER_PROTOCOL => "HTTP/1.1",
"psgi.errors" => *main::STDERR,
"psgi.input" => \*Plack::Server::Standalone::$input,
"psgi.multiprocess" => "",
"psgi.multithread" => "",
"psgi.run_once" => "",
"psgi.url_scheme" => "http",
"psgi.version" => [1, 0],
};
my $input = \*Plack::Server::Standalone::$input;
my $is_keepalive = 1;
my $reqlen = 145;
my $res = [400, ["Content-Type", "text/plain"], ["Bad Request"]];
my $rlen = 145;
my $self = do {
require Symbol;
my $a = bless({
host => 0,
keepalive_timeout => 2,
listen_sock => bless(Symbol::gensym(), "IO::Socket::INET"),
max_keepalive_reqs => 100,
port => 8080,
timeout => 300,
}, "Plack::Server::Standalone");
*{$a->{listen_sock}} = {
io_socket_domain => 2,
io_socket_proto => 6,
io_socket_timeout => undef,
io_socket_type => 1,
};
$a;
};
my $use_keepalive = undef;
</pre></body></html></li><li>in Plack::Server::Standalone::handle_connection at lib/Plack/Server/Standalone.pm line 111<pre class="context"><code> 108: if ($may_keepalive && $max_reqs_per_child && $proc_req_count >...
109: $may_keepalive = undef;
110: }
<strong class="match"> 111: $self->handle_connection($env, $conn, $app, $may_keepalive, $req_count != 0)
</strong> 112: or last;
113: # TODO add special cases for clients with broken keep-alive support, as well as disabling keep-alive for HTTP/1.0 proxies
114: }
</code></pre><p><a class="toggle" href="javascript:showLexicals('lexicals-12')">Show lexical variables</a></p><pre class="lexicals" id="lexicals-12">my $app = sub { "???" };
my $conn = do {
require Symbol;
my $a = bless(Symbol::gensym(), "IO::Socket::INET");
*{$a} = {
io_socket_peername => pack("H*","1002c5c57f0000010000000000000000"),
io_socket_timeout => undef,
};
$a;
eg/output.html view on Meta::CPAN
SERVER_PROTOCOL => "HTTP/1.1",
"psgi.errors" => *main::STDERR,
"psgi.input" => \*Plack::Server::Standalone::$input,
"psgi.multiprocess" => "",
"psgi.multithread" => "",
"psgi.run_once" => "",
"psgi.url_scheme" => "http",
"psgi.version" => [1, 0],
};
my $max_reqs_per_child = undef;
my $may_keepalive = 1;
my $proc_req_count = 5;
my $req_count = 1;
my $self = do {
require Symbol;
my $a = bless({
host => 0,
keepalive_timeout => 2,
listen_sock => bless(Symbol::gensym(), "IO::Socket::INET"),
max_keepalive_reqs => 100,
port => 8080,
timeout => 300,
}, "Plack::Server::Standalone");
*{$a->{listen_sock}} = {
io_socket_domain => 2,
io_socket_proto => 6,
io_socket_timeout => undef,
io_socket_type => 1,
};
$a;
eg/output.html view on Meta::CPAN
61: $self->setup_listener();
<strong class="match"> 62: $self->accept_loop($app);
</strong> 63: }
64:
65: sub setup_listener {
</code></pre><p><a class="toggle" href="javascript:showLexicals('lexicals-13')">Show lexical variables</a></p><pre class="lexicals" id="lexicals-13">my $app = sub { "???" };
my $self = do {
require Symbol;
my $a = bless({
host => 0,
keepalive_timeout => 2,
listen_sock => bless(Symbol::gensym(), "IO::Socket::INET"),
max_keepalive_reqs => 100,
port => 8080,
timeout => 300,
}, "Plack::Server::Standalone");
*{$a->{listen_sock}} = {
io_socket_domain => 2,
io_socket_proto => 6,
io_socket_timeout => undef,
io_socket_type => 1,
};
$a;
eg/output.html view on Meta::CPAN
44: __END__
45:
</code></pre><p><a class="toggle" href="javascript:showLexicals('lexicals-14')">Show lexical variables</a></p><pre class="lexicals" id="lexicals-14">my $app = "eg/dot-psgi/error.psgi";
my $env = "development";
my $handler = sub { "???" };
my $help = 0;
my $server = do {
require Symbol;
my $a = bless({
host => 0,
keepalive_timeout => 2,
listen_sock => bless(Symbol::gensym(), "IO::Socket::INET"),
max_keepalive_reqs => 100,
port => 8080,
timeout => 300,
}, "Plack::Server::Standalone");
*{$a->{listen_sock}} = {
io_socket_domain => 2,
io_socket_proto => 6,
io_socket_timeout => undef,
io_socket_type => 1,
};
$a;
( run in 0.733 second using v1.01-cache-2.11-cpan-39bf76dae61 )