use strict; use module; $my_variable_name = "A new value"; print "the value of \$my_variable_name = $my_variable_name\n"; #print the local value print "the value of the package variable = $apackage::my_variable_name\n"; # print the package value