Interpolation of Perl code for hashrefs