{my $foo++;  say $foo;}
{my $foo++;  say $foo;}
{our $bar++; say $bar;}
{our $bar++; say $bar;}
__END__
1
1
1
2