We help IT Professionals succeed at work.

Check out our new AWS podcast with Certified Expert, Phil Phillips! Listen to "How to Execute a Seamless AWS Migration" on EE or on your favorite podcast platform. Listen Now

x

in need of pulldown menu script

ficken
ficken asked
on
Medium Priority
216 Views
Last Modified: 2010-03-04
I am in need of a good perl cgi script that will run a pulldown menu script on my pages. I have a javascript running for this that includes an alternate option to call up a cgi script for those who  have non-javascript enabled browsers. Now I need a perl script that will perform the function. I would also like to be able to store the selectable URLS for the menu in a separate SSI file so that I can update the script without having to edit all of my web pages....

here is the script I have that the perl script needs to interface with:

  <HTML>
      <HEAD>
      <TITLE>PulldownNGo</TITLE>
      <SCRIPT LANGUAGE="JavaScript">
      <!-- // hide from old browsers
      var MSIE3 = (navigator.appVersion.indexOf('MSIE') !=-1 && navigator.appVersion.indexOf('3.')
      !=-1);
      function goThere(selidx) {
         Opt = document.forms[0].sel.options[selidx].value;
         tgt = Opt.substring(0,Opt.indexOf(','));
         loc = Opt.substring(Opt.indexOf(',')+1);
         eval(tgt + '.location ="' + loc + '"');
      }
      // end hide -->
      </SCRIPT>
      </HEAD>
      <BODY>
      <FORM ACTION="/cgi-bin/goscript.pl">
      <SCRIPT LANGUAGE="JavaScript">
      <!-- // hide from old browsers
      document.write('<SELECT NAME="sel"');
      if (MSIE3) document.write('>');
      else {
         document.write(' ONCHANGE="goThere(selectedIndex);selectedIndex=0;">');
         document.write('<OPTION VALUE="self,self.location.href">--- Select a site ---');
      }
      // end hide -->
      </SCRIPT>
      <NOSCRIPT>
      <SELECT>
      </NOSCRIPT>
      <OPTION VALUE="top,http://www.netscape.com">Netscape
      <OPTION VALUE="self,feedback.html">Feedback
      <OPTION VALUE="top.frames[0],feedback.html">Feedback
      </SELECT>
      <SCRIPT LANGUAGE="JavaScript">
      <!-- // hide from old browsers
      if (MSIE3) document.write('<INPUT TYPE="BUTTON" VALUE= "Go!" ONLICK="goThere(this.form.sel.selectedIndex)">');
      // end hide -->
      </SCRIPT>
      <NOSCRIPT>
      <INPUT TYPE="SUBMIT" VALUE="Go!">
      </NOSCRIPT>
      </FORM>
      </BODY>
      </HTML>

Comment
Watch Question

Commented:
Unlock this solution and get a sample of our free trial.
(No credit card required)
UNLOCK SOLUTION

Commented:
BTW keeping a seperate file for the menu is a good idea. It would simply be all html, no need to change your code.

sorry, looked again at the script above it was wrong
(too much copying and pasting),
try this...



#!/www/servers/common/perl5

require "cgi-lib.pl"; # library that will help with cgi
&ReadParse;               # function in cgi-lib.pl to grab form data
      
$file = $in{"file"}; # file ($in{"file"}) would be the name of
                               # your pull down menu. This will grab the
                               # html file associated with the menu
                               # selection and place it in the $file var.

print "Location: $file\n\n";
# this will open the html file in $file

###################################

GL,
t
Unlock the solution to this question.
Thanks for using Experts Exchange.

Please provide your email to receive a sample view!

*This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

OR

Please enter a first name

Please enter a last name

8+ characters (letters, numbers, and a symbol)

By clicking, you agree to the Terms of Use and Privacy Policy.