while ( my ( $outer_key, $outer_value ) = each %hash )
  {
      while ( my ( $inner_key, $inner_value ) = each %$outer_value )
      {
          # do whatever...
      }
  }