our $value = "package var";
my $value = "lexical var";
my $ref = "value";
$, = ", ";
print ${$ref}, $value, eval "\$$ref";