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

##</code><code>##

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