my $t = 'test';
print eval '$t';  # test