Select Code to Download

use strict;
use warnings;
...
C::printit;
printit;
print "Package Main VAR=$VAR\n";

Output of the above script it....

...
Package C VAR=4
Package Main VAR=5
Package Main VAR=4