my $foo = "bar";
print qq{"$foo"}; # prints "bar" with the quotes