$foo = "bar";
$_ = "foo";
print $$_;