Select Code to Download

#!/usr/bin/env perl -l

...

print '*** AFTER ***';
print $string;

*** BEFORE ***
     is a TAB
...
isaTAB
isaSPACE
TABandSPACE

#!/usr/bin/env perl -l

...

print '*** AFTER ***';
print $string;

*** BEFORE ***
     is a TAB
...
isaTAB
isaSPACE
TABandSPACE