cgi sumbit no-worky

[Anonymous Monk]

Oh Venerable ones,

I have the following code

@machines=("a", "b", "c");
use CGI qw(:standard);
 $q = new CGI;
 #$q->use_named_parameters(1);

 print $q->header(-title=>'SI',
                  -author=>'me'),
       $q->p,
       $q->start_html('Welcome'),
       $q->p,
       $q->h1('Welcome'),
       $q->h3('Which machine would you like to Analyize?'),
       $q->popup_menu(-name=>'machines',
                            -values=>\@machines),
       $q->p,
       $q->submit;
       $machine=$q->param('machines');
       $q->end_html;

 if ($q->params) {
      <do some stuff>
 }

The if section is never executed. Please help.

[MrCromeDome]

CGI no starty form ;) You may wish to stick a $q->start_form() and $q->end_form() in and see where it gets you.

Cheers!
MrCromeDome

[valdez]

What happens if you add $p->start_form before $p->popup_menu and $p->end_form after $p->submit?

Ciao, Valerio

[rdfield]

You're using the OO CGI interface, no need for the "qw(:standard)" in the second line.

rdfield

[cfreak]

As others have said the lack of $q->start_form and $q->end_form is the probable culprit. Whenever you can't get a form to submit or something just doesn't display correctly on your page make sure to view the HTML source that your program spit out, in this case you could have seen that your form had no form tags and thus was not being sent at all.

Hope that helps,
Chris

Lobster Aliens Are attacking the world!