How to evaluate a raw string?

[Manfred Lotz]

Hi all,

I like to specify a raw string, like for example $w:

my $who = "my friend";
my $w = q(This is \n $who.);


Now I want to evaluate that raw string so that the result is a string:
This is
my friend.


eval doesn't seem to help.


Actually I want to be able to specify a raw string where at the end of 
the day only variables get expanded.


Any idea how to do this?



--
Manfred