Greg London has been slinging perl code for more than a decade. His perl code on CPAN includes Tk::TextUndo among others.