>perl -le"$pkg::var1; $pkg::{'var2'}; print for keys %pkg::;"
var1

##</code><code>##

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

##</code><code>##

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