Select Code to Download

my $var;
    isn't both a symbol table entry created
...

our $var;
    only a symbol table entry?

package packA;
use strict;
...
print "  packA  ourVAR  = $ourVAR \n";
my $ourVAR = "456 RST";
print "  packAA  ourVAR = $ourVAR \n";