Re: ot perl help request

2002-04-23 Thread Colin Watson
On Mon, Apr 22, 2002 at 11:02:54AM -0700, justin cunningham wrote: > Hello, I'm trying to get this script to do error checking but it prints > the error page every time regardless if there is or isn't input data. > It works ok without the if statement but I wanted it to do the > errorchecking. I s

Re: ot perl help request

2002-04-22 Thread Elizabeth Barham
Oops.. should be: (first line changed) if(!defined($name) || $name eq "") { # in this case, we redirect them to an error if the name is # undefined or it is equal to "" (blank) print $q->redirect(-location=>$ERR); } else { print $q->redirect(-location=>$OUTPAGE); } -- To UNSUBSCRIBE,

Re: ot perl help request

2002-04-22 Thread Elizabeth Barham
Hi Justin, I'm having a hard time understanding your script. What's the deal with 'Q' and import_data ? __BEGIN_REWRITE__ #!/usr/bin/perl -w use strict; # helps ; must declare varibles use CGI; use CGI::Carp qw/fatalsToBrowser/; my $OUTPAGE = '/thankyou.html'; my $ERR = '/error.html'; my $DATA

ot perl help request

2002-04-22 Thread justin cunningham
Hello, I'm trying to get this script to do error checking but it prints the error page every time regardless if there is or isn't input data. It works ok without the if statement but I wanted it to do the errorchecking. I spent a good amount of time trying to figure this out on my own before email