package Test;
$var = "value";
print($Test::var eq "value" ? "true" : "false", "\n");  # true