diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-10-26 12:52:37 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-10-26 12:52:37 +0000 |
| commit | 9e72e4c611b0297cb770c791d72e9d74b901d604 (patch) | |
| tree | ea46951d6e51c5b2d98642ddc64e514baded8401 /pod/perlfaq9.pod | |
| parent | c7a4d1c0391ba3d9736e90c66ae273d85847f9b0 (diff) | |
| download | perl-9e72e4c611b0297cb770c791d72e9d74b901d604.tar.gz | |
FAQ sync.
p4raw-id: //depot/perl@25857
Diffstat (limited to 'pod/perlfaq9.pod')
| -rw-r--r-- | pod/perlfaq9.pod | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/pod/perlfaq9.pod b/pod/perlfaq9.pod index 336d22d5e9..577d15115b 100644 --- a/pod/perlfaq9.pod +++ b/pod/perlfaq9.pod @@ -1,6 +1,6 @@ =head1 NAME -perlfaq9 - Networking ($Revision: 1.23 $, $Date: 2005/08/10 15:54:54 $) +perlfaq9 - Networking ($Revision: 1.24 $, $Date: 2005/10/13 19:43:13 $) =head1 DESCRIPTION @@ -366,9 +366,9 @@ C<param()> function. use CGI qw(:standard); - my $total = param( "price" ) + param( "shipping" ); + my $total = param( 'price' ) + param( 'shipping' ); - my @items = param( "item ); # multiple values, same field name + my @items = param( 'item' ); # multiple values, same field name If you want an object-oriented approach, CGI.pm can do that too. @@ -376,9 +376,9 @@ If you want an object-oriented approach, CGI.pm can do that too. my $cgi = CGI->new(); - my $total = $cgi->param( "price" ) + $cgi->param( "shipping" ); + my $total = $cgi->param( 'price' ) + $cgi->param( 'shipping' ); - my @items = $cgi->param( "item" ); + my @items = $cgi->param( 'item' ); You might also try CGI::Minimal which is a lightweight version of the same thing. Other CGI::* modules on CPAN might work better |