Error handling won't go away!

I'm having problems with my error handling. It's kind of hard to explain so I'll just post my code and bold where the error handling is and then explain what is happening.

Just to warn you, I am new to Perl so the code probably will be ugly!

Expand|Select|Wrap|Line Numbers

 
#! /usr/local/bin/perl
 
BEGIN

{

    open(STDERR, ">&STDOUT");

    select(STDERR); $| = 1;

    select(STDOUT); $| = 1;

    print "Content-type: text/html\n\n";

}
 
if($ENV{'QUERY_STRING'} eq "")

{

    &page1;

    exit;

}
 
read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
 
if($buffer eq "")

{

    $buffer = $ENV{'QUERY_STRING'};

}
 
@pairs = split(/&/, $buffer);

foreach $pair(@pairs)

{

        ($name, $value) = split(/=/, $pair);
 
    $value =~ tr/+/ /;

        $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;

        $name =~ tr/+/ /;

        $name =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
 
    if($FORM{$name} eq "")

    {

        $FORM{$name} = $value;

    }

    else

    {

        $FORM{$name} .= " " . $value;

    }

}
 
print <<ENDHTML;

<HTML>

<HEAD>

<TITLE>Assignment #4</TITLE>

</HEAD>

<BODY text="white" bgcolor="blue">

<FONT face="arial" size="4">

<DIV align="center">

<br>

ENDHTML
 
sub page1

{

print <<ENDHTML;

<HTML>

<HEAD>

<TITLE>Assignment #4</TITLE>

</HEAD>

<BODY text="white" bgcolor="blue">

<FONT face="arial" size="4">

<DIV align="center">

<br>
 
<FORM METHOD=GET ACTION="http://cs.sunyit.edu/~westj2/cgi-bin/assignment4.pl/page2">
 
Enter number of elements to add and average:&nbsp

<input type="text" name="numelements" value="" maxlength="7"><br><br>
 
<input type="submit" name="submit" value="Submit">&nbsp&nbsp

<input type="reset">

</FORM>

</DIV>

</FONT>

</BODY>

</HTML>
 
ENDHTML

}        
 
 if($FORM{'numelements'} eq "")

{

    print "Invalid number of elements!";    

}

else

{

    &page2;

}
 
sub page2

{

print <<ENDHTML;
 
<FORM METHOD=GET ACTION="http://cs.sunyit.edu/~westj2/cgi-bin/assignment4.pl/page3>
 
ENDHTML
 
$elements = $FORM{'numelements'};
 
for($i = 0; $i <= $elements; $i++)

{

    print "Enter number $i: ";

    print q{<input type="text" name="numelements" maxlength="7"><br>};

}
 
print <<ENDHTML;

<HTML>

<HEAD>

<TITLE>Assignment #4</TITLE>

</HEAD>

<BODY text="white" bgcolor="blue">

<FONT face="arial" size="4">

<DIV align="center">

<br>

<input type="submit" name="submit" value="Submit">&nbsp&nbsp

<input type="reset">

</FORM>

</DIV>

</FONT>

</BODY>

</HTML>

ENDHTML

}
 
#if($FORM{'elements'} eq "")

#{

#        print "Invalid number of elements!";

#}

#else

#{

#        &page3

#}
 
sub page3

{

print <<ENDHTML;

<HTML>

<HEAD> 

<TITLE>Assignment #4</TITLE>

</HEAD>

<BODY text="white" bgcolor="blue">

<FONT face="arial" size="4">

<DIV align="center">

<br>

ENDHTML

print test;

}

So, the problem lies with the error handling. On the first page, I have the user enter the number of elements they want to be added together and averaged. Then, I have some error handling that checks to see if the user entered something. If they didn't, then it displays "Invalid number of elements!". Else, it calls page2. In page2, I have a for loop that displays the number of textboxes needed for the user to enter the elements. Here, when they hit submit after entering in the elements, it shows the "Invalid number of elements!" error again and I don't know why. I'm assuming it has something to do with the previous error handling, but I don't know how to fix it.

Feb 15 '08 #1

Subscribe Post Reply

1761

eWish

971

Expert 512MB

The strict and warnings pragmas will help you catch some of the obvious and not so obvious problems. I recommend that you start using those.

Also, where are you declaring the hash %FORM that holds the form data?

--Kevin

Feb 15 '08 #2

JWest46088

The strict and warnings pragmas will help you catch some of the obvious and not so obvious problems. I recommend that you start using those.

Also, where are you declaring the hash %FORM that holds the form data?

--Kevin

I haven't learned anything about the hash. How exactly would that work?

I'm having a different problem now with storing the inputs on page2. After the user inputs the numbers and clicks submit, it does the for loop again or something so if the first text box contained the number 3, it will reprint 3 text boxes (while there was 2 before).

Feb 15 '08 #3

JWest46088

Should I be putting in something like require "subparseform.lib"; in the code?

Maybe @elements = values{%FORM}; too?

Feb 15 '08 #4

KevinADC

4,059

Expert 2GB

Ewish:

Didn't you notice the URL the form tag points to?

http://cs.sunyit.edu/~westj2/cgi-bin/assignment4.pl/page2

;)

Feb 15 '08 #5

JWest46088

Ewish:

Didn't you notice the URL the form tag points to?

http://cs.sunyit.edu/~westj2/cgi-bin/assignment4.pl/page2

;)

Where should it be pointed to then? I deleted the /page2 part from all of the form tags and now I'm getting a document not found error.

Feb 15 '08 #6

JWest46088

I think the main problem lies within the for loop. If I knew how to store the numbers the user inputs into the text boxes on page2, then I would be able to continue on with the rest of the program.

Feb 15 '08 #7

JWest46088

I think the main problem lies within the for loop. If I knew how to store the numbers the user inputs into the text boxes on page2, then I would be able to continue on with the rest of the program.

The user inputs the number of elements to add. The value of the input (from the textbox "numelements") gets sent to subroutine page2. In sub page2, the user inputs however many numbers they specified in "numelements". In the for loop to do this, the textbox "numelements" is printed that many times. How would I change the name of the textbox for all of the textboxes printed out? I think the problem is that the first textbox on page2 overwrites numelements instead of being saved as its own. Then, the for loop takes that input... I don't know.

Feb 15 '08 #8

KevinADC

4,059

Expert 2GB

Where should it be pointed to then? I deleted the /page2 part from all of the form tags and now I'm getting a document not found error.

Just letting Ewish know that you are working on school/class/course work. At least you are giving it a try.

Feb 15 '08 #9

Similar topics

assert vs error handling

by: Christian Christmann | last post by:

Hi, assert and error handling can be used for similar purposes. When should one use assert instead of try/catch and in which cases the error handling is preferable? I've read somewhere that...

C / C++

How do I stop a form's open event in if there's an error?

by: Julia Baresch | last post by:

Hi everyone, As some of you may know, we've been having trouble with an unrecognized database format error. Today I installed an unfinished project on the workstation of one of my users. ...

Microsoft Access / VBA

Error on: DoCmd.RunCommand acCmdDeleteRecord

by: Squirrel | last post by:

I have a command button on a subform to delete a record. The only statement in the subroutine is: DoCmd.RunCommand acCmdDeleteRecord The subform's recordsource is "select * from tblVisit order...

Microsoft Access / VBA

Error trapping code

by: Thelma Lubkin | last post by:

I use code extensively; I probably overuse it. But I've been using error trapping very sparingly, and now I've been trapped by that. A form that works for me on the system I'm using, apparently...

Microsoft Access / VBA

Error looping through controls on form in Access 2003

by: TD | last post by:

This is the code under a command button - Dim ctl As Control For Each ctl In Me.Controls If ctl.BackColor <> RGB(255, 255, 255) Then ctl.BackColor = RGB(255, 255, 255) End If Next ctl

Microsoft Access / VBA

An error handling scheme (long)

by: Spacen Jasset | last post by:

The main two desirable things I feel error handling should provide are these: 1) Debugging and diagnostic aid 2) User feedback One method that is used a fair amount it to 'say' that all...

C / C++

On Error translation

by: tiger79 | last post by:

Hello, I'd like to know what the C# counterpart is for the VB On Error statement ? My VB code looks like this : On Error GoTo ErrGetItem plain simple ud say, but I need to "translate" it into...

C# / C Sharp

What is the difference between exceptions and simple error handlingtechniques?

by: adam.timberlake | last post by:

I've just finished reading the article below which goes into some depth about exceptions. The article was rather lucid and so I understand how to implement it all, the thing I'm having trouble with...

PHP

Frustrations with Error Logging

by: sean_walsh | last post by:

Hi From classic ASP, I had a custom error handling situation that was quite simple. Errors were all redirected to Error.asp. This page would check 2 settings, EmailErrorMessage and...

ASP.NET

How to turn on java script in a villaon keypad mobile phone

by: Charles Arthur | last post by:

How do i turn on java script on a villaon, callus and itel keypad mobile phone

Java

Batch import of multiple excel files into the database

by: ryjfgjl | last post by:

If we have dozens or hundreds of excel to import into the database, if we use the excel import function provided by database editors such as navicat, it will be extremely tedious and time-consuming...

Data Management

Navigating the Data Structures and Algorithms (DSA)

by: BarryA | last post by:

What are the essential steps and strategies outlined in the Data Structures and Algorithms (DSA) roadmap for aspiring data scientists? How can individuals effectively utilize this roadmap to progress...

Algorithms / Advanced Math

How to build RAID in BIOS?

by: Hystou | last post by:

There are some requirements for setting up RAID: 1. The motherboard and BIOS support RAID configuration. 2. The motherboard has 2 or more available SATA protocol SSD/HDD slots (including MSATA, M.2...

Computer Hardware

What is ONU?

by: marktang | last post by:

ONU (Optical Network Unit) is one of the key components for providing high-speed Internet services. Its primary function is to act as an endpoint device located at the user's premises. However,...

General

Changing the language in Windows 10

by: Hystou | last post by:

Most computers default to English, but sometimes we require a different language, especially when relocating. Forgot to request a specific language before your computer shipped? No problem! You can...

Windows Server

Problem With Comparison Operator <=> in G++

by: Oralloy | last post by:

Hello folks, I am unable to find appropriate documentation on the type promotion of bit-fields when using the generalised comparison operator "<=>". The problem is that using the GNU compilers,...

C / C++

The easy way to turn off automatic updates for Windows 10/11

by: Hystou | last post by:

Overview: Windows 11 and 10 have less user interface control over operating system update behaviour than previous versions of Windows. In Windows 11 and 10, there is no way to turn off the Windows...

Windows Server

Discussion: How does Zigbee compare with other wireless protocols in smart home applications?

by: tracyyun | last post by:

Dear forum friends, With the development of smart home technology, a variety of wireless communication protocols have appeared on the market, such as Zigbee, Z-Wave, Wi-Fi, Bluetooth, etc. Each...

General