c:\@Work\Perl\monks>perl -wMstrict -le
"my $weird = qq{C:\Users\li\test};
 print qq{weird double-quotish interpolation '$weird'};
 ;;
 my $cool = qq{C:/Users/li/test};
 print qq{forward slashes '$cool'};
 ;;
 my $single = 'C:\Users\li\test\\';
 print qq{non-interpolating single quotes '$single'};
"
weird double-quotish interpolation 'C:SERSI     EST'
forward slashes 'C:/Users/li/test'
non-interpolating single quotes 'C:\Users\li\test\'