*mysub = eval 'sub { $myvar; }'