{
  package Foo;
  my $foo = 1;
  package Bar;
  # can still see $foo here
  package Baz;
  # can still see $foo here
}
# cannot see $foo any more