my $text = q{
  Dear $person,
  I know that this text is $adjective.
  But I wish it could be...

};

my $person    = 'Mom';
my $adjective = 'not interpolated';

print eval "qq{$text}";

__OUTPUT__

  Dear Mom,
  I know that this text is not interpolated.
  But I wish it could be...