Such mal lieber per Google in der perl/Tk-Newsgroup (comp.lang.perl.tk) oder in der perl/Tk-Mailingliste. Dort gibt es bestimmt ein funktionierendes fileevent-Beispiel.