String::LCSS provides the function "lcss" to ferret out the longest common substring shared by two strings passed as arguments. "undef" is returned if the susbstring length is one char or less. This is an algorithm I wrote some years ago in C and thought it might be fun to rewrite in Perl since CPAN seemed to be in want of such a thing. There is probably a Perlier way to write the algorithm, but... Not much planned for the future, perhaps changing the args of the "lcss" function to accept an arbitrary lenght array would be useful. We wait then for a rainy day...