Perhaps something like this is what you want.

for my $k (grep { defined } delete $hash{Foo}, keys %hash) {
    # ... do stuff here
}
[download]