Help for this page

Select Code to Download


  1. or download this
    #! perl -l
use strict;
...
{
    print 'Found match ', $1, $2, ' at pos: ', pos $s;
}
  2. or download this
    22:35 >perl 1476_SoPW.pl
Found match abcXYZ at pos: 12
...
Found match abcXYZ at pos: 12

22:35 >