Re: referer throwing Internal Server Error

2006-03-13 Thread David Dorward
On Mon, Mar 13, 2006 at 07:30:45PM -0600, David Gilden wrote: > Here is my little script and it throwing a Internal Server Error Try running it from the command line: Software error: Missing right curly or square bracket at - line 13, at end of line syntax error at - line 13, at EOF Execution

Re: referer throwing Internal Server Error

2006-03-13 Thread Sara
m|i) { print "Your not authorized: Bad Referer: $referer \n"; } else { print "all cool: $referer \n"; } Sara. - Original Message - From: "David Gilden" <[EMAIL PROTECTED]> To: Sent: Tuesday, March 14, 2006 6:30 AM Subject: referer throwing Internal

referer throwing Internal Server Error

2006-03-13 Thread David Gilden
Greetings from Cow Tow! Here is my little script and it throwing a Internal Server Error #!/usr/bin/perl use CGI qw/:standard/; use CGI::Carp qw(fatalsToBrowser); use POSIX 'strftime'; use strict; my $referer = referer; if ($referer !~ m|^https?://www\.coraconnection\.com|i) { pr