jerrygarciuh has asked for the wisdom of the Perl Monks concerning the following question:
_____________________________________________________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 th +is error please ", a( {-href=>"mailto:bug\@nolaflash.com?Subject=New+Member+Bug!+$ref +erer"},"email us"),".";exit; }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Referer check within domain problem
by Abigail-II (Bishop) on Nov 22, 2002 at 16:20 UTC | |
by jerrygarciuh (Curate) on Nov 22, 2002 at 17:05 UTC | |
by Abigail-II (Bishop) on Nov 22, 2002 at 17:21 UTC | |
|
Re: Referer check within domain problem
by Mr. Muskrat (Canon) on Nov 22, 2002 at 16:17 UTC | |
|
Re: Referer check within domain problem
by huguei (Scribe) on Nov 22, 2002 at 16:39 UTC | |
|
Re: Referer check within domain problem
by jerrygarciuh (Curate) on Nov 22, 2002 at 16:51 UTC |