Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"
 
PerlMonks  

Re: Redirection from a pulldown menu

by dlc (Acolyte)
on Jan 20, 2000 at 23:30 UTC ( [id://2230]=note: print w/replies, xml ) Need Help??


in reply to Redirection from a pulldown menu

simple enough to do in perl. here is some sample html:

<form action='go.cgi' method='post'>
 <select name='go'>
  <option value='http://perlmonks.org/'>perlmonks.org
  <option value='http://slashdot.org/'>slashdot
  <option value='http://freshmeat.net/'>freshmeat
 </select>
 <input type='submit' value='stumbit'>
</form>

call your cgi script "go.cgi" and make it executable. you are in business.

key point to remember

  • there must be a blank space after the end of the headers that you are printing
  • you need to either specify the full url to redirect to either in the script or in the html. incomplete or relative paths may work or may not, depending on the browser.

sample perl script:

#!/usr/bin/perl

use CGI 'param';

my $go = param('go');
print <<END;
Location: $go

END
# add logging, etc in here. if you are setting cookies,
# put them right after the Location line.

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others learning in the Monastery: (5)
As of 2024-04-25 10:24 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found