my $good_url = 'http://www.thesite.org/';
my $also_good = 'https://www.thesite.org';

my $referer = $ENV{'HTTP_REFERER'};
if ( $referer !~ /^$good_url/ && $referer !~ /^$also_good/) {
	print $q->header,start_html,h2("Bad Referer."), "If you receive this error please ",
	a( {-href=>"mailto:bug\@nolaflash.com?Subject=New+Member+Bug!+$referer"},"email us"),".";exit;
}