foreach my $key (@keys) {
  print "$key - " . param($key) ." <br>";
}