do {
  require Symbol;
  my $a = bless({
    _log                 => bless({
                              _body => "[info] *** Request 67823 (18.261/s) [50437] [Sun Dec 15 22:17:07 2019] ***\n[debug] Path is \"/\"\n[debug] Arguments are \"~Greg\"\n[debug] \"GET\" request for \"~Greg\" from \"127.0.0.1\"\n[debug] Rendering template \"author.tt\"\n[error] Caught exception in WWW::UsePerl::Server::Controller::Root->default \"No user found for Greg at /Volumes/code_partition/use_perl_archive/WWW-UsePerl-Server-0.36/script/../lib/WWW/UsePerl/Server/Controller/Root.pm line 164.\"\n",
                              _psgi_errors => *main::STDERR,
                              abort => undef,
                              autoflush => 0,
                              level => 31,
                            }, "Catalyst::Log"),
    _path                => "~Greg",
    _read_length         => 0,
    _read_position       => 0,
    _use_hash_multivalue => 0,
    action               => "/",
    address              => "127.0.0.1",
    arguments            => ["~Greg"],
    base                 => bless(do{\(my $o = "http://localhost:3000/")}, "URI::http"),
    body_parameters      => {},
    captures             => [],
    cookies              => {},
    data_handlers        => {
                              "application/json" => sub { ... },
                              "application/x-www-form-urlencoded" => sub { ... },
                            },
    env                  => {
                              "Catalyst.Stash.v2"             => sub { ... },
                              "HTTP_ACCEPT"                   => "*/*",
                              "HTTP_HOST"                     => "localhost:3000",
                              "HTTP_USER_AGENT"               => "curl/7.64.1",
                              "PATH_INFO"                     => "/user/Greg",
                              "plack.original_request_method" => "GET",
                              "psgi.errors"                   => *main::STDERR,
                              "psgi.input"                    => \*HTTP::Server::PSGI::$input,
                              "psgi.multiprocess"             => "",
                              "psgi.multithread"              => "",
                              "psgi.nonblocking"              => "",
                              "psgi.run_once"                 => "",
                              "psgi.streaming"                => 1,
                              "psgi.url_scheme"               => "http",
                              "psgi.version"                  => [1, 1],
                              "psgix.harakiri"                => 1,
                              "psgix.input.buffered"          => 1,
                              "psgix.io"                      => bless(Symbol::gensym(), "IO::Socket::INET"),
                              "QUERY_STRING"                  => "",
                              "REMOTE_ADDR"                   => "127.0.0.1",
                              "REMOTE_PORT"                   => 64815,
                              "REQUEST_METHOD"                => "GET",
                              "REQUEST_URI"                   => "/user/Greg",
                              "SCRIPT_NAME"                   => "",
                              "SERVER_NAME"                   => 0,
                              "SERVER_PORT"                   => 3000,
                              "SERVER_PROTOCOL"               => "HTTP/1.1",
                            },
    headers              => bless({
                              "::std_case" => { cookie => "Cookie" },
                              "accept" => "*/*",
                              "host" => "localhost:3000",
                              "user-agent" => "curl/7.64.1",
                            }, "HTTP::Headers"),
    match                => "/",
    method               => "GET",
    parameters           => {},
    protocol             => "HTTP/1.1",
    query_parameters     => {},
    remote_user          => undef,
    secure               => 0,
    uploads              => {},
    uri                  => bless(do{\(my $o = "http://localhost:3000/user/Greg")}, "URI::http"),
  }, "Catalyst::Request");
  *{$a->{env}{"psgix.io"}} = {
    io_socket_domain   => 2,
    io_socket_peername => "\20\2\xFD/\x7F\0\0\1\0\0\0\0\0\0\0\0",
    io_socket_proto    => 6,
    io_socket_timeout  => undef,
    io_socket_type     => 1,
  };
  $a;
}

bless({
  _log => bless({
    _body => "[info] *** Request 67823 (18.261/s) [50437] [Sun Dec 15 22:17:07 2019] ***\n[debug] Path is \"/\"\n[debug] Arguments are \"~Greg\"\n[debug] \"GET\" request for \"~Greg\" from \"127.0.0.1\"\n[debug] Rendering template \"author.tt\"\n[error] Caught exception in WWW::UsePerl::Server::Controller::Root->default \"No user found for Greg at /Volumes/code_partition/use_perl_archive/WWW-UsePerl-Server-0.36/script/../lib/WWW/UsePerl/Server/Controller/Root.pm line 164.\"\n",
    _psgi_errors => *main::STDERR,
    abort => undef,
    autoflush => 0,
    level => 31,
  }, "Catalyst::Log"),
  _response_cb => sub { ... },
  body => "<!DOCTYPE html>\n<html lang=\"en\">\n  <head>\n    <meta charset=\"utf-8\">\n    <title>use.perl.org journals of  (page )</title>\n    <meta name=\"viewport\" content=\"width=device-width, initial-scale=1.0\">\n    <meta name=\"description\" content=\"\">\n    <meta name=\"author\" content=\"\">\n\n    <!-- Le styles -->\n    <link href=\"/static/css/bootstrap.css\" rel=\"stylesheet\">\n    <style>\n      body {\n        padding-top: 60px; /* 60px to make the container go all the way to the\nbottom of the topbar */\n      }\n    </style>\n    <link href=\"/static/css/bootstrap-responsive.css\" rel=\"stylesheet\">\n\n    <!-- Le HTML5 shim, for IE6-8 support of HTML5 elements -->\n    <!--[if lt IE 9]>\n      <script\nsrc=\"http://html5shim.googlecode.com/svn/trunk/html5.js\"></script>\n    <![endif]-->\n\n    <!-- Le fav and touch icons -->\n    <link rel=\"shortcut icon\" href=\"/static/ico/favicon.ico\">\n  </head>\n\n  <body>\n\n    <div class=\"navbar navbar-fixed-top\">\n      <div class=\"navbar-inner\">\n        <div class=\"container\">\n          <a class=\"btn btn-navbar\" data-toggle=\"collapse\"\ndata-target=\".nav-collapse\">\n            <span class=\"icon-bar\"></span>\n            <span class=\"icon-bar\"></span>\n            <span class=\"icon-bar\"></span>\n          </a>\n          <a class=\"brand\" href=\"/\"><img src=\"/static/img/slashhead.png\"/></a>\n          <div class=\"nav-collapse\">\n            <ul class=\"nav\">\n              <li><a href=\"/\">Home</a></li>\n              <li><a href=\"/about/\">About</a></li>\n              <li><a href=\"/authors/\">Authors</a></li>\n              <li><a href=\"/journals/\">Journals</a></li>\n              <li><a href=\"/stories/\">Stories</a></li>\n            </ul>\n            <p class=\"navbar-text\">All the Perl that's Practical to Extract and Report</p>\n          </div><!--/.nav-collapse -->\n        </div>\n      </div>\n    </div>\n\n\n<div class=\"container\">\n\n<div class=\"row\">\n\n<div class=\"span8\">\n\n<h1><a href=\"/user//1\"></a>'s journals (page )</h1>\n\n\n\n<ul>\n\n</ul>\n\n<div class=\"pagination\">\n<ul>\n<li class=\"disabled\"><a href=\"/user//1\">&lt;&lt;</a></li>\n<li class=\"disabled\"><a href=\"/user//1\">&lt;</a></li><li class=\"disabled\"><a href=\"/user//1\">&gt;</a></li>\n<li class=\"disabled\"><a href=\"/user//1\">&gt;&gt;</a></li>\n</ul>\n</div>\n\n\n</div> <!-- /span8 -->\n\n</div> <!-- row -->\n</div> <!-- /container -->\n\n\n\n    <!-- Le javascript\n    ================================================== -->\n    <!-- Placed at the end of the document so the pages load faster -->\n\n  </body>\n</html>\n\n",
  cookies => {},
  encodable_content_type => qr/text|xml$|javascript$/,
  encoding => bless({ Name => "utf-8-strict", strict_utf8 => 1 }, "Encode::utf8"),
  finalized_headers => 0,
  headers => bless({
    "::std_case"   => { "x-catalyst" => "X-Catalyst" },
    "content-type" => "text/html; charset=utf-8",
    "x-catalyst"   => 5.90124,
  }, "HTTP::Headers"),
  status => 200,
}, "Catalyst::Response")

{ template => "author.tt" }

do {
  my $a = {
    "Action::RenderView" => {
      ignore_classes => [
                          "DBIx::Class::ResultSource::Table",
                          "DBIx::Class::ResultSourceHandle",
                          "DateTime",
                        ],
      scrubber_func  => sub { ... },
    },
    "db_dsn" => "dbi:mysql:useperl",
    "db_password" => "P\@55w0rd",
    "db_user" => "useperl",
    "disable_component_resolution_regex_fallback" => 1,
    "enable_catalyst_header" => 1,
    "home" => "/Volumes/code_partition/use_perl_archive/WWW-UsePerl-Server-0.36",
    "name" => "WWW::UsePerl::Server",
    "Plugin::ConfigLoader" => {},
    "Plugin::Static::Simple" => {
      debug => 1,
      dirs => [],
      ignore_dirs => [],
      ignore_extensions => ["tmpl", "tt", "tt2", "html", "xhtml"],
      include_path => [
        bless({
          dirs => [
            "",
            "Volumes",
            "code_partition",
            "use_perl_archive",
            "WWW-UsePerl-Server-0.36",
            "root",
          ],
          file_spec_class => undef,
          volume => "",
        }, "Path::Class::Dir"),
      ],
      mime_types => {},
      mime_types_obj => bless({}, "MIME::Types"),
      no_logs => 1,
    },
    "root" => 'fix',
    "static" => 'fix',
  };
  $a->{"root"} = $a->{"Plugin::Static::Simple"}{include_path}[0];
  $a->{"static"} = $a->{"Plugin::Static::Simple"};
  $a;
}