$pkg::var = "foo";
package pkg;
print $var;