$a = $a * 2

##</code><code>##

"\$$v = \$$v * 2"

##</code><code>##

eval "\$$v = \$$v * 2; 1" or die $@;