Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris
 
PerlMonks  

Re^2: Form Action

by Zcity (Novice)
on Jul 03, 2006 at 12:55 UTC ( #558987=note: print w/ replies, xml ) Need Help??


in reply to Re: Form Action
in thread Form Action

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


Comment on Re^2: Form Action
Download Code
Re^3: Form Action
by davidrw (Prior) on Jul 03, 2006 at 19:55 UTC
    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://558987]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others chanting in the Monastery: (13)
As of 2014-10-30 14:24 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    For retirement, I am banking on:










    Results (208 votes), past polls