C:>perl -E "$ x = 1; say $ x; say qq($      x)"
1
1

C:>perl -E "$x = 1; $ x= 5; say qq($      x)"
5

C:>perl -E "$name = q(Fred); $debt = 50; say qq(You pay me ${debt}$ 00 cents, $name, or else!)"
You pay me 50 cents, Fred, or else!