Perl HTTP proxy server with REGEX filter