Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number
 
PerlMonks  

Re: simplifying a CGI param request

by brian_d_foy (Abbot)
on Apr 07, 2006 at 17:24 UTC ( [id://541932] : note . print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    foreach my $number ( 1 .. 25 )
      {
    ...
      # or, without $value
      # printf "q%d: %s\n", $number, param( "q$number" );
      }
    
  2. or download this
    my @array = ( undef, map { scalar param("q$_") } 1 .. 25 );