Perl/Tk::Text beim scrollen Callback aufrufen

[rettich]

Ich versuche gerade einen Texteditor zu basteln, der bestimmte Textstellen farbig markiert. Zum optimieren wird immer nur der aktuell gezeigte Text eingefärbt. Das funktioniert auch soweit.
Nun brauche ich aber eine Option, die eine Subroutine aufruft, sobald ein neuer Text durch Scrollen (Scrollbar/Pfeiltasten) sichtbar wird.
Bin für jede Idee und jeden Vorschlag dankbar.