foreach my $key (@keys)
{
    print "$key: $hash{$key}\n";
}