my @fieldnames = param(); # hiermit holt man sich alle Feldnamen
foreach(@fieldnames){
  print $_, " -> ",param($_),"<br />\n";
}