Perl: removed unused variable, forgotten in 975d7ab37b39.
diff --git a/src/http/modules/perl/nginx.xs b/src/http/modules/perl/nginx.xs
index 309b7cb..caf7c08 100644
--- a/src/http/modules/perl/nginx.xs
+++ b/src/http/modules/perl/nginx.xs
@@ -933,7 +933,6 @@
     ngx_http_request_t   *r;
     ngx_http_perl_ctx_t  *ctx;
     SV                   *uri;
-    ngx_uint_t            i;
 
     ngx_http_perl_set_request(r, ctx);