$ perl -e 'my ($v1, $v2) = qw{A B}; print "My answer is \"\_" . $v1 . " _" . $v2 . "\"\n";' My answer is "_A _B"