Skip Menu |
 

This queue is for tickets about the Text-Levenshtein CPAN distribution.

Report information
The Basics
Id: 26134
Status: resolved
Worked: 30 min
Priority: 0/
Queue: Text-Levenshtein

People
Owner: JGOLDBERG [...] cpan.org
Requestors: frederic.marchal [...] wowcompany.com
Cc:
AdminCc:

Bug Information
Severity: Normal
Broken in:
  • 0.04
  • 0.05
Fixed in: (no value)



Subject: Wrong distance computed
Download (untitled) / with headers
text/plain 391b
The distance returned by distance("sebastian","sebastien") is 8. It should be 1... Commenting out these parts fixes the problem $d[0][0]=0; foreach my $i (1 .. $n) { # if ($i != $n && substr($s,$i) eq substr($t,$i)) { # push @result,$i;next; # } $d[$i][0]=$i; } foreach my $j (1 .. $m) { # if ($j != $m && substr($s,$j) eq substr($t,$j)) { # push @result,$j;next; # } $d[0][$j]=$j; }
From: JGOLDBERG [...] cpan.org
Download (untitled) / with headers
text/plain 509b
This should be fixed in 0.06_01. On Fri Apr 06 10:17:54 2007, fmarchal wrote: Show quoted text
> The distance returned by distance("sebastian","sebastien") is 8. It > should be 1... > > Commenting out these parts fixes the problem > > $d[0][0]=0; > foreach my $i (1 .. $n) { > # if ($i != $n && substr($s,$i) eq substr($t,$i)) { > # push @result,$i;next; > # } > $d[$i][0]=$i; > } > foreach my $j (1 .. $m) { > # if ($j != $m && substr($s,$j) eq substr($t,$j)) { > # push @result,$j;next; > # } > $d[0][$j]=$j; > }
resolved in 0.06_01


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.