my $newvar = $Sam;