$ perl -E 'my $name = q{Ken}; say q{(sn = $name)}'
(sn = $name)

##</code><code>##

$ perl -E 'my $name = q{Ken}; say qq{(sn = $name)}'
(sn = Ken)