print "local \$$_ = \$$_;\n" for @listofvarnames;

##</code><code>##

local $blah = $blah;
...