# This prints:
# Lexicals: 12
# Globals: 34

use strict;

# nested my() example
my $lex = 1;
{
#  local $lex; this line is a syntax error
  my $lex = 2;
  print "Lexicals: $lex ";
}
print "$lex\n";

# local()ized global
our $global = 3;
{
  local $global;
  $global = 4;
  print "Globals: $global ";
}
print "$global\n";