Help for this page

Select Code to Download


  1. or download this
    #!perl
    use strict;
    ...
        print " Found.  Starts at position - $idx\n"
    }
    print "\n"
    
  2. or download this
    VinsWorldcom@C:\Users\VinsWorldcom\tmp> test.pl
    101001 Found.  Starts at position - 3
    101000