$ENV{HTTP_REFERER} =~ m!^[^:]+://[^/]+/([^?]+)! or die "No path info!";
my $path = $1;