This is untested....

my $query = new CGI;
my %names = $query->Vars;
foreach my $key(keys(%names)) {
  print "$key\: $names{$key}\n" if (($key eq 'name') or ($key eq 'email'));
}



-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to