use strict;
{ local our $a = "A"; }
{ our $b = "B"; }
print "a = $a\n";
print "b = $b\n";
__DATA__
a =
b = B