if you build an array, say with the following snippet:
open IN, $file;
push @all_IDs, $_;
What I want to do is to calculate the Levenshtein distance between each element and all the rest in the array.
If I have only 2 IDS, it is easy:
use Text::Levenshtein qw(distance);
$distance = distance ($id1, $id2);
What must I write in order to sequentially grep each of the IDS and then compare it to the rest? With slice
I guess I would remove it and I do not want that, maybe slice
once I am done? Something smarter?