my $match_pos = index $str, $search, (index $str, $search) + length $search;