foreach my $key ( keys %some::very::long::named::module::foo ) {
  my $val =            $some::very::long::named::module::foo{$key};