From: Dobrica Pavlinušić Date: Wed, 25 Nov 2009 14:07:30 +0000 (+0100) Subject: cleanup output X-Git-Url: http://git.rot13.org/?p=HTTP-Proxy-Archive.git;a=commitdiff_plain;h=123fb12125ac856cc68e7482b25c6b90fdb6db55 cleanup output --- diff --git a/proxy.pl b/proxy.pl index a5b545e..ec6e344 100755 --- a/proxy.pl +++ b/proxy.pl @@ -221,7 +221,7 @@ sub debug_dump { -e 'var/debug' && warn "## ", dump( @_ ) } my $admin_filter = HTTP::Proxy::HeaderFilter::simple->new( sub { my ( $self, $headers, $message ) = @_; -warn "XXX [", $headers->header('x-forwarded-for'), '] ', $message->uri, "\n"; +warn "\nXXX [", $headers->header('x-forwarded-for'), '] ', $message->uri, "\n"; print $message->headers_as_string if debug_on;