sub show1 { ... }
sub show2 { ... }

my $a = 'foo';
show1($a);    #desired print $a='foo'
show2('$a');  #desired print $a='foo'
$a = 'foobar';
show1($a);    #desired print $a='foobar'