my $name = "Sam";
my $newvar = '$' . $name;