foreach $auth (keys %hash) { print FILE "$hash{$auth}{fname} $hash{$auth}{lname}: $hash{$auth}{count}\n"; }