# dann die einzelnen Schluessel und Werte
   print "$key = ";
   my @vals = ();
   foreach my $val (@{$params{$key}{values}})
...