foreach (keys %{$ref}) {
    print $_." ".Dumper($ref->{$_})."\n";
}