package A; print "the global k in package B is $B::k\n";