Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked
 
PerlMonks  

Re: Form Action

by Joost (Canon)
on Jun 30, 2006 at 23:28 UTC ( #558701=note: print w/ replies, xml ) Need Help??


in reply to Form Action

As I sort of mentioned before, you seem to be having trouble understanding program execution flow. I think you're forgetting something fairly basic:

Unless you're deliberately changing the execution flow programs are executed from top to bottom.

In other words, since the only place you assign a value to $action is at the very end, that variable will be undefined everywhere else it's being used.

You'll also want to read up on how the web works. and see Ovid's CGI course.


Comment on Re: Form Action
Re^2: Form Action
by Zcity (Novice) on Jul 03, 2006 at 12:55 UTC

    Thanks to All for the help. Anyways, i got it to work by doing this:

    print "Content-type: text/html\n\n"; print "<HTML>\n"; print "<HEAD>\n"; print "<TITLE>Forum</TITLE>\n"; print "</HEAD>\n"; print "<BODY>\n"; print "<FORM METHOD=POST>\n"; print "<INPUT TYPE='submit' VALUE='Preview' name='preview' onClick=thi +s.form.action='preview.cgi';this.form.target=''>\n"; print "<INPUT TYPE='submit' VALUE='Submit Reply' name='reply' onClick= +this.form.action='createreply.cgi';this.form.target=''><br>\n"; print "</FORM>\n"; print "</BODY>\n"; print "</HTML>\n";

    Code tags added by GrandFather

      using here-docs will make that output code cleaner and resolve some quoting issues (your onClick values will be problematic as-is)...
      print <<EOF; Content-type: text/html <HTML> <HEAD> <TITLE>Forum</TITLE> </HEAD> <BODY> <FORM METHOD="POST"> <INPUT TYPE="submit" VALUE="Preview" name="preview" onClick="this.fo +rm.action='preview.cgi';this.form.target=''"> <INPUT TYPE="submit" VALUE="Submit Reply" name="reply" onClick="this +.form.action='createreply.cgi';this.form.target=''"> </FORM> </BODY> </HTML>
      or, using CGI:
      print header, start_html( -title => 'forum' ), start_form( -method => 'POST' ), submit( -name => 'preview', -value=>'Preview', -onClick => "this.for +m.action='preview.cgi';this.form.target=''" ), submit( -name => 'reply', -value=>'Submit Reply', -onClick => "this. +form.action='createreply.cgi';this.form.target=''" ), end_form, end_html, ;

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://558701]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (5)
As of 2014-08-22 22:22 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (168 votes), past polls