On 11/30/06, David Bear <[EMAIL PROTECTED]> wrote:
my $q = CGI->new();
my %params = $q->Vars;
foreach $f (keys (%params)) {
print "$f is $params{$f} ";
}
use CGI;
my $q = CGI->new();
my %params = $q->Vars;
foreach my $f (keys (%params)) {
print "$f is $params{$f}\n";
}
--
WC (Bill) Jones -- http://youve-reached-the.endoftheinternet.org/
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
