Help for this page

Select Code to Download


  1. or download this
    >perl -wMstrict -le
"my $string =
...
uuu     vvv     'www            '       xxx     '               yyy'  
+  zzz

uuu     vvv     'www'   xxx     'yyy'   zzz
  2. or download this
    use warnings;
use strict;
...
   { (my $notabs = $1) =~ tr{\t}{}d;  $notabs }xmsge;

print qq{$string};
  3. or download this
    uuu     \"vvv   "notab          "       xxxx    "               no\"ta
+b"        zzz
uuu     \"vvv   "notab" xxxx    "no\"tab"       zzz