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>