Mary Anderson wrote:
> Hi all,
> I am writing an application (my first!) which calls for a screen with a
> half dozen or so popup-menus. My test program with two popup-menus
> displays the first one correctly with the four choices I gave it. The
> second one displays with only one choice. If I comment out one or the
> other popup, the one left displays correctly. If I change the order of the
> popups, the second one displays incorrectly with one choice.
>
> I also get an error message:
>
> The specified CGI application misbehaved by not returning a complete set of
> HTTP headers. The headers it did return are:(then nothing except the table
> I requested to be printed out!)
>
> use strict;
> use CGI qw/:standard :html3/;
> my @rows;
>
> push @rows, TR(th({-align=>'LEFT'}, "Try this, too"),
> td(popup_menu(-name => 'grains', -values => ["oats", "peas",
> "beans",
> "barley"], -override=>1)));
>
> push @rows, TR(th({-align=>'LEFT'},"Try This Out"),
> td(popup_menu(-name => 'veggies', -values => ["okra",
> "romanesque broccoli", "angle beans", "epazote"],
> -override => 1)));
print header;
> print start_html;
> print start_form;
> print table(@rows);
> print end_form;
> print end_html;
>
> L. Stein's book indicates maybe I should try capitalizing one of the
> values. But first that doesn't work, and second, if it did, I still would
> not be able to get a half dozen popups on my screen! specifying override
> makes no difference.
_______________________________________________
ActivePerl mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
