Sounds you ask for eval.

my $type_of_animal = 'giraffe';
my $text = 'I wish I were a $type_of_animal';

my $new_text = eval "qq{$text}";
[download]