my $var1 = <<'END';
\' $new \' \\ \/
END

my $var2 = q/\' $new \' \\ \/
/;

print $var1, $var2;

# outputs
\' $new \' \\ \/
\' $new \' \ /