my $request = qq{http://$ENV{'SERVER_NAME'}$ENV{'REQUEST_URI'}};