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 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
