>perl -le"$x = "var"; ${$x} = "abc"; print $var;"
abc