Help for this page
my $foo = 1; our $foo = 2; print $foo ; # prints 2
our $foo = 2; my $foo = 1; print $foo ; # prints 1
no warnings; ... package Bar; no strict; print 'Bar: '. $foo, "\n"; # $foo is undefined
www.com | www.net | www.org
No recent polls found