{
  my $bar;
  sub foo {
    ...
  }
}