Win8 Strawberry 5.8.9.5 (32)  Wed 04/28/2021 19:35:55
C:\@Work\Perl\monks
>perl -l

use strict;
use warnings;

our $foo = 'package global';

{  # begin scope

my $foo = 'lexical';

print 'A: ', $foo;
print 'B: ', $::foo;
print 'C: ', $main::foo;

}  # end scope

^Z
A: lexical
B: package global
C: package global