There is also an LCS implementation in Algorithm::Diff...

UPDATE: After inspecting the documentation of Text::Diff it turns out that it relies on Algorithm::Diff for its LCS implementation (I did not know that).