c:\@Work\Perl\monks>perl -wMstrict -le
"my $sqsq = 'abc\'';
 print qq{<$sqsq> \n};
 ;;
 my $sqbs = 'abc\\';
 print qq{>$sqbs< \n};
"
<abc'>

>abc\<