use strict;
use warnings;

$main::var_my = "foo1";

my $var_my = "foo2";

print "Lexical: $var_my\n";
print "Package: $main::var_my\n";


##</code><code>##

Lexical: foo2
Package: foo1