while ($keepOnWatching) {
 $inotify->watch($watchpoint,IN_ALL_EVENTS);
 @events=$inotify->read;# sleep, and wake when events arrive
 # undef $inotify
 processEvents(@events);
}

##</code><code>##

 $inotify->watch($watchpoint,IN_ALL_EVENTS);
while ($keepOnWatching) {
 @events=$inotify->read;# sleep, and wake when events arrive
 processEvents(@events);
}