Select Code to Download

#!/usr/bin/perl

...
warn $BBB::var;

1;

#!/usr/bin/perl

...
warn $BBB::var;

1;

#!/usr/bin/perl

...

warn $AAA::var;
warn $BBB::var;

aaa at AAA.pm line 10.
Use of uninitialized value $BBB::var in warn at AAA.pm line 11.
...
bbb at BBB.pm line 13.
aaa at CCC.pl line 8.
bbb at CCC.pl line 9.