You may want to look at the source of Algorithm::Diff it has a bunch of nifty tricks for doing the same kind of things.

Waswas