Help for this page

Select Code to Download


  1. or download this
    >perl -wMstrict -le
"my $s = qq{abandon/to\t(a road)\t};
...
"
1 'o'  2 '(a r'  3 'ad)'
'abandon/t      (a road)        '
  2. or download this
    >perl -wMstrict -le
"for my $s (qq{abandon/to\t(a road)\t},
...
'abandon/to     xxx abandon/to yyy      '
1 'abandon/to'   2 '    xxx abandon/to yyy      '
'       xxx abandon/to yyy      '