Help for this page

Select Code to Download

Select or download this

c:\@Work\Perl\monks>perl -wMstrict -le
"print 'match with \r' if qq{ Directory of D:\\ \\Q\\X \r} =~ /.{20}\\
+[a-zA-Z]\s[\r\n]/;
 print 'match sans \r' if qq{ Directory of D:\\ \\Q\\X }   =~ /.{20}\\
+[a-zA-Z]\s[\r\n]/;
"
match with \r