Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic
 
PerlMonks  

Re: Redirection from a pulldown menu

by dlc (Acolyte)
on Jan 20, 2000 at 23:30 UTC ( #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
Node Status?
node history
Node Type: note [id://2230]
help
Chatterbox?
[Tanktalus]: Does anyone have a link to somewhere that explains why it's a bad idea to spit out text on stdout/stderr in the login scripts when it's a non-interactive shell?

How do I use this? | Other CB clients
Other Users?
Others having an uproarious good time at the Monastery: (7)
As of 2017-04-25 21:15 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    I'm a fool:











    Results (464 votes). Check out past polls.