Hi there,

On Mon, 29 Nov 1999, Erich L. Markert wrote:

> skeleton copy of the code below.
> 
> [-
> use Apache;
> use Apache::Constants qw(REDIRECT);
> 
> error checking and form validation going on here...
> 
> $new_applicant and $errors are set appropriately here...
> -]
> 
> <HTML>
> <HEAD><TITLE>Untitled Document</TITLE>
> </HEAD>
> <BODY BGCOLOR="white" TEXTCOLOR="black">
> [$ if( ( $new_applicant ) || ( $errors ) ) $]
> [+ $application->display_errors_as_html() if( ($errors) || ($application->errors()) 
>); +]
> [+ $student->display_errors_as_html() if( $student->errors()); +]
> 
> <FORM METHOD="post" ACTION="[+ 
>qq!http://$ENV{SERVER_NAME}/Nactel/new-application.epl! +]" 
>ENCTYPE="application/x-www-form-urlencoded">
> </FORM>
> 
> [$ else $]
> [-
> use Apache;
> use Apache::Constants qw(REDIRECT);
> 
> $req_rec->header_out("Location" => 
>qq!http://$ENV{SERVER_NAME}/Nactel/common/contact-info.epl?application_id=$fdat{'application_id'}&form_name=$fdat{'form_name'}!);
> $req_rec->status(REDIRECT);
> -]
> [$ endif $]
> 
> </BODY>
> </HTML>
> 

The nesting in this example looks a bit strange to me.
Have you taken this from your working (failing) code?

Kind regards,
Ged.

Reply via email to