Perl module to produce common sub-string indices for two strings
