Re: @INC

2006-03-13 Thread Sean Davis
If you are using bash as you shell, something like: export PERL5LIB=${PERL5LIB}:/usr/local/project/packages That will set the global search path for perl to find modules to include '/usr/local/project/packages'. However, the better way to handle this is to set up a directory that you use for

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) {

Re: referer throwing Internal Server Error

2006-03-13 Thread Sara
#!/usr/bin/perl use CGI qw/:standard/; use CGI::Carp qw(fatalsToBrowser); use POSIX 'strftime'; use strict; use warnings; my $q = new CGI; my $referer = $ENV{'HTTP_REFERER'} || 'foo.com'; print $q-header(); if ($referer !~ m|^https?://www\.coraconnection\.com|i) { print Your not authorized:

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: h1Software error:/h1 preMissing right curly or square bracket at - line 13, at end of line syntax error at - line 13, at EOF