2 use warnings FATAL => 'all';
5 eval { require HTTP::Request::AsCGI }
7 : (skip_all => 'No HTTP::Request::AsCGI')
11 use Web::Simple 'EnvTest';
15 my $env = @_[PSGI_ENV];
17 [ "Content-type" => "text/plain" ],
24 use HTTP::Request::Common qw(GET POST);
26 my $app = EnvTest->new;
30 my $c = HTTP::Request::AsCGI->new($request)->setup;
36 ok run_request(GET 'http://localhost/')->is_success;