$VAR1 = [ bless( { '_CGI' => bless( { 'env' => { 'DOCUMENT_DEFAULT' => undef, 'DOCUMENT_ROOT' => undef, 'HTTP_ACCEPT' => '*/*', 'HTTP_ACCEPT_ENCODING' => 'gzip, br, zstd, deflate', 'HTTP_CONNECTION' => 'Keep-Alive', 'HTTP_HOST' => '127.0.0.1:5000', 'HTTP_USER_AGENT' => 'Mozilla/5.0 AppleWebKit/537.36 (KHTML, like Gecko; compatible; ClaudeBot/1.0; +claudebot@anthropic.com)', 'HTTP_X_FORWARDED_FOR' => '216.73.216.21', 'HTTP_X_FORWARDED_HOST' => 'psgi.isolutions.com.au', 'HTTP_X_FORWARDED_SERVER' => 'psgi.isolutions.com.au', 'PATH_INFO' => '/bs.psp', 'QUERY_STRING' => '', 'REMOTE_ADDR' => '127.0.0.1', 'REMOTE_PORT' => 38876, 'REQUEST_METHOD' => 'GET', 'REQUEST_URI' => '/bs.psp', 'SCRIPT_NAME' => '', 'SERVER_NAME' => 0, 'SERVER_PORT' => 5000, 'SERVER_PROTOCOL' => 'HTTP/1.1', 'plack.request.body_parameters' => [], 'plack.request.merged' => bless( {}, 'Hash::MultiValue' ), 'plack.request.query_parameters' => [], 'plack.request.upload' => bless( {}, 'Hash::MultiValue' ), 'psgi.errors' => *::STDERR, 'psgi.input' => \*{'HTTP::Server::PSGI::$input'}, 'psgi.multiprocess' => !!0, 'psgi.multithread' => !!0, 'psgi.nonblocking' => !!0, 'psgi.run_once' => !!0, 'psgi.streaming' => !!1, 'psgi.url_scheme' => 'http', 'psgi.version' => [ 1, 1 ], 'psgix.harakiri' => !!1, 'psgix.input.buffered' => !!1, 'psgix.io' => bless( \*Symbol::GEN1466, 'IO::Socket::INET' ) }, 'request_body_parser' => bless( [ [ [ 'application/x-www-form-urlencoded', 'HTTP::Entity::Parser::UrlEncoded', undef ], [ 'multipart/form-data', 'HTTP::Entity::Parser::MultiPart', undef ] ], 1048576 ], 'HTTP::Entity::Parser' ) }, 'WebDyne::CGI::PSGI' ), '_cwd' => '/home/aspeer/Development/pm-WebDyne/', '_data_ar_err' => [ [ 'perl', { 'handler' => 'handler', 'param' => '%{ a=> 1}' }, [ [ 'perl', { 'inline' => 1, 'perl' => ' print Dumper(\\@_) ' }, undef, undef, 2, 2, \'/home/aspeer/Development/pm-WebDyne/bs.psp' ], [ 'subst', undef, [ ' ${data}' ], undef, 3, 3, $VAR1->[0]{'_data_ar_err'}[0][2][0][6] ] ], 1, 1, 4, $VAR1->[0]{'_data_ar_err'}[0][2][0][6] ], $VAR1->[0]{'_data_ar_err'}[0][2][0] ], '_eval_cgi_hr' => $VAR1->[0]{'_CGI'}{'env'}{'plack.request.merged'}, '_html_tiny_or' => bless( { '_mode' => 'html', '_r' => bless( { 'document_default' => '/home/aspeer/Development/pm-WebDyne/lib/WebDyne/index.psp', 'document_root' => '/home/aspeer/Development/pm-WebDyne', 'env' => $VAR1->[0]{'_CGI'}{'env'}, 'filename' => '/home/aspeer/Development/pm-WebDyne/bs.psp', 'headers_out' => { 'Content-Type' => 'text/html' }, 'select' => bless( \*Symbol::GEN1467, 'IO::String' ), 'uri' => '/bs.psp' }, 'WebDyne::Request::PSGI' ), 'autotag' => { 'method' => { 'area' => 'closed', 'base' => 'closed', 'br' => 'closed', 'col' => 'closed', 'embed' => 'closed', 'hr' => 'closed', 'img' => 'closed', 'input' => 'closed', 'keygen' => 'closed', 'link' => 'closed', 'meta' => 'closed', 'param' => 'closed', 'source' => 'closed', 'track' => 'closed', 'wbr' => 'closed' }, 'suffix' => { 'body' => ' ', 'div' => ' ', 'head' => ' ', 'html' => ' ', 'p' => ' ', 'table' => ' ', 'tr' => ' ' } } }, 'WebDyne::HTML::Tiny' ), '_inode' => 'adf6e2d36e1feb89eaa02421f0c86b0e', '_meta_hr' => { 'manifest' => [ ${$VAR1->[0]{'_data_ar_err'}[0][2][0][6]} ], 'perl' => [ \' use Data::Dumper; sub handler { return shift()->render(data=>Dumper($_[0])) } ' ], 'perl_debug' => [ [ 5, $VAR1->[0]{'_data_ar_err'}[0][2][0][6] ] ], 'time_compile' => '1765384844.93189', 'time_compile_elapsed' => '0.0276' }, '_perl' => [ $VAR1->[0]{'_data_ar_err'}[0] ], '_perl_data' => [ { 'a' => 1, 'data' => '$VAR1 = { \'a\' => 1 }; ' }, { 'a' => 1 } ], '_r' => $VAR1->[0]{'_html_tiny_or'}{'_r'}, '_select' => 'WebDyne::WEBDYNE', '_time' => '1765384844.93189' }, 'WebDyne' ), $VAR1->[0]{'_perl_data'}[0] ]; $VAR1 = { 'a' => 1 };