use Translation::Memory;

my $memory = Translation::Memory->new (
     source_language => 'en',
     store => 'memory.db',
     type => 'sqlite',
);

my @segs = break ($text);
my %matches = $memory->find_matches (\@segs);

Translation memory handler to deal with storing, retrieving and searching translated text.

Interface not supplied, can be used as backend with anything, including webby-json/ajax system or Micrsofot Word via OLE system or anything else whatsoever.

Just an idea at present, no proper name, no code, wondering if such a module exists in some obscure place on cpan.

Dependency on some kind of edit distance searcher function.

This is not a translation system, it is translation memory system. There is an extensive article on Translation Memory on Wikipedia, please refer to it if you are not sure what this means.

Maybe use SQLite for the memory database (?).