$ perl -E 'my $x = q{test.com\User1}; say "$x"' test.com\User1 $ perl -E 'my $x = qq{test.com\User1}; say "$x"' test.comSER1