use Data::Dumper; use Plack::Request; use Plack::Response; my $app = sub { my $req = Plack::Request->new(shift); my $query = $req->parameters; my $res = Plack::Response->new(200); $res->body('
' . Dumper($query) . '
'); $res->finalize; };