my ($offset, $edits, $distance) = fuzzy_index ($needle, $haystack);

##</code><code>##

my $needleLenght=length ($needle);
substr($haystack, $offset, $needleLenght) = "my new value";