How about this beautiful implementation of diff?

http://perl.plover.com/diff/

He even abstracted the core into a module...