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

>\  \\  \\\<