my $location = $ENV{HTTP_HOST} . $ENV{SCRIPT_NAME};