Help for this page

Select Code to Download


  1. or download this
    %menu_labels = ('one'=>'eenie',
                    'two'=>'meenie',
    ...
    print $CGI->popup_menu(-name=>'menu_name',
                -values=>\@menu_values,
                -labels=>\%menu_labels);
    
  2. or download this
    %menu_labels = ( eenie  => 'one',
                     meenie => 'two',
    ...
    print $CGI->popup_menu(-name   => 'menu_name',
                           -values => \@menu_values,
                           -labels => \%menu_labels);