in reply to Dealing with missing TK FocusOut event

Try binding <Modified> instead.

http://perltk.org