Perl: removed unused variables, forgotten in ef6a3a99a81a.
diff --git a/src/http/modules/perl/nginx.xs b/src/http/modules/perl/nginx.xs
index da12279..fd59e29 100644
--- a/src/http/modules/perl/nginx.xs
+++ b/src/http/modules/perl/nginx.xs
@@ -269,8 +269,7 @@
     u_char                     *p, *lowcase_key, *value, sep;
     STRLEN                      len;
     ssize_t                     size;
-    ngx_uint_t                  i, n, hash;
-    ngx_array_t                *a;
+    ngx_uint_t                  i, hash;
     ngx_list_part_t            *part;
     ngx_table_elt_t            *h, *header, **ph;
     ngx_http_header_t          *hh;