my $a = 'return $_[0] + $_[1];';
print eval $a(3, 5); 

or perhaps:

my $a = 'return $_[0] + $_[1];';
print eval $a->(3, 5);