nopaste.txt

    $pkg->app->hook(before_dispatch => sub {
        my $c = shift;

        my $url   = $c->server_url;
        my $path  = $c->req->url->path;
        my $query = $c->req->url->query;

        $url->path($path);
        $url->query($query);

        $c->req->url($url);

        $c->app->log->info($url);
        $c->app->log->info($c->dumper($url));
    });