use Data::Dumper qw/Dumper/;
my %hash = (
  a => b,
  1 => [7,8,9],
  42 => {'die' => 'antwort'},
);

print Dumper \%hash; # man beachte den "\" für eine schönere Ausgabe :)