foreach $key (keys %hash) { print $key, $key{'fname'}, $key{'lname'}, "\n"; }