$foo = 1;
  if ( 1 ) {
      my $foo = 2;
  }
  print "$foo\n";