our $var = 42;
our $vvv = 'abc';
{
  local $var = 500;
  print "$var $vvv\n";
}
print "$var $vvv\n";