Re: Comparing 2 different-sized strings

[roboticus]

AdrianJ217:

Something like this should work:

my $s1='TCGAGTGGCCATGAACGTGCCAATTG';
my $s2='ATGATCCTG';
($s1,$s2) = ($s2,$s1) if length($s1) > length($s2);
my $loc = index $s2, $s1;
if ($loc<0) {
   print "String not found!\n";
}
else {
   print "String found at location $loc\n";
}

...roboticus

When your only tool is a hammer, all problems look like your thumb.

[Laurent_R]

The OP wants to allow for some mismatches. The index function is not suitable for that.