in reply to Re: CGI scoping question
in thread CGI scoping question
I did try to omit pieces that seemed irrelevant, so I didn't include how the parameters were being set. Several parameters are being set through classical forms, e.g.
This orderby and desc fields are not -- they are being manually set viaprint $q->start_form(), 'Please choose an action: ', $q->popup_menu( -name => 'exec', -values => ['add', 'list', 'search' +] ), $q->popup_menu( -name => 'table', -values => ['users', 'VPN', 'VMacc +ounts', 'supporting tables'] );
(The titles on the table lets you sort by that field, and if you click on an already-sorted field it reverses it.)print $q->h2($subtitle), "\n<table border>\n\t<tr><th>ID</th><th>Type +"; foreach (my $i=1; $i<=$#USER_FIELDS; $i++) { my $flags = '?exec=list&table=users&orderby='.$i; if ($i == $index) { $flags .= '&desc=1'; } print "</th><th><a href=\"$flags\">$LABELS{$USER_FIELDS[$i]}</a>"; } print "</th></tr>\n";
I didn't think that relevant, because its all upstream: at the invocation I'm looking at, the value of orderby is being shown in the $q->Dump output; yet its vanished by the time the first subroutine is called. That is, I've got a print statement, a couple of local assignments, two if's that call listUsers(), a little DB work at the top of sub listusers, and then orderby has vanished. I am assuming there is some sort of global variable passing between CGI instances that I don't know about? ... well, I'm confused.
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^3: CGI scoping question
by haukex (Archbishop) on May 10, 2019 at 18:26 UTC | |
by WoodyWeaver (Monk) on May 10, 2019 at 18:47 UTC | |
by Anonymous Monk on May 16, 2019 at 23:47 UTC | |
Re^3: CGI scoping question
by tangent (Parson) on May 10, 2019 at 18:33 UTC | |
by WoodyWeaver (Monk) on May 10, 2019 at 18:57 UTC |
In Section
Seekers of Perl Wisdom