>perl -wMstrict -le
"my $sq = 'start \ \\ \' stop';
 print qq{'$sq'};
"
'start \ \ ' stop'