Re: Capturing parameters in Perl CGI

George,

<input type="checkbox" name="box1">Box1
<input type="checkbox" name="box2">Box2
<input type="checkbox" name="box3">Box3

would be accessed as follows:

$cgi->param('box1')
$cgi->param('box2')
$cgi->param('box3')

assuming $cgi is a CGI object instantiated like this:

use CGI;
my $cgi = new CGI;

You can also capture all parameters sent to your cgi program by invoking the
param method without specifying the parameter as follows:

my @params = $cgi->param();

You can then check to make sure something was passed like this:

if ( scalar @params != 0 ) {
  #something passed in
} else {
  # Uh-oh
}

Greg

On 11/17/06, George Morey <George.Morey@xxxxxxxxxxxx> wrote:

Greg,

Not sure what you mean by below.  By the way my 'submit' button is
specified as follows:

<input type=submit value=ENTER>

I'm particularily uncertain as to what you mean by -> 'The names of
your input elements are the names of your parameters that will be
accessible using the param method.'

George...



>>> "Greg Oziemkiewicz" <goziemki@xxxxxxxxx> 11/17/2006 7:49 AM >>>
George,

Take out the '?parm' from the form action and give your radio buttons
different names. The names of your input elements are the names of
your
parameters that will be accessible using the param method.

Greg


On 11/16/06, George Morey <George.Morey@xxxxxxxxxxxx> wrote:
>
> Greg,
>
> Did it and got the following:
>
> Can't call method "param" on an undefined value at
> /QOpenSys/perl/webwrap/dbtest4 line 13.
>
> The HTML that invokes my Perl CGI is the following:
>
> <form method=post action="/cgi-bin/dbtest4?parm">
> <p>
> <table border=0>
> <tr><td><input type=radio name=parm value="query"></td><td>Customer
> bank codes & acct #</td></tr>
> <p>
> <tr><td><input type=radio name=parm value="oscmd"></td><td>WRKCFGSTS
> *NWS</td></tr>
> <p>
> <tr><td><input type=radio name=parm value="query3"></td><td>Not
> enabled</td></tr>
> </center></table>
>
> The Perl that attempts to process the input is:
>
> $myparm = $query->param('parm');
> print $myparm;
>
> Regards...George
>
> >>> "Greg Oziemkiewicz" <goziemki@xxxxxxxxx> 11/16/2006 3:03 PM >>>
> George,
>
> Use the post method then $query->param('param_name').
>
> Greg
>
>
> On 11/16/06, George Morey <George.Morey@xxxxxxxxxxxx> wrote:
> >
> > I invoke my CGI with the following passing it 'param'.
> >
> > <form method=get action="/cgi-bin/dbtest4?parm">
> >
> > I currently have the following code in my Perl CGI to try and
decode
> > what is occuring:
> >
> > $query = new CGI;
> > print $query;
> >
> > The print results in the following
> >
> > CGI=HASH(0x200215a8)
> >
> > Assuming that $query once initialized is a pointer to some data I
> > attempt to use it as such and get bupkiss.
> >
> > Can you suggest what is occurrring and how I might capture the
> passed
> > parameter to use for control flow in my program?
> >
> >
> > --
> > This is the Web Enabling the AS400 / iSeries (WEB400) mailing list
> > To post a message email: WEB400@xxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/mailman/listinfo/web400
> > or email: WEB400-request@xxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at http://archive.midrange.com/web400.
> >
> >
> --
> This is the Web Enabling the AS400 / iSeries (WEB400) mailing list
> To post a message email: WEB400@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/web400
> or email: WEB400-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/web400.
>
> --
> This is the Web Enabling the AS400 / iSeries (WEB400) mailing list
> To post a message email: WEB400@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/web400
> or email: WEB400-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/web400.
>
>
--
This is the Web Enabling the AS400 / iSeries (WEB400) mailing list
To post a message email: WEB400@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/web400
or email: WEB400-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/web400.

--
This is the Web Enabling the AS400 / iSeries (WEB400) mailing list
To post a message email: WEB400@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/web400
or email: WEB400-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/web400.