Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
    
    use strict;
    ...
     
     $event->w->cancel;
    }) or die "watch creation failed: $!";
    
  2. or download this
    $  inotifywatch -v -e access -e modify -t 20 -r /tmp/j
    Establishing watches...
    Setting up watch(es) on /tmp/j
    ...
    Will listen for events for 20 seconds.
    total  modify  filename
    18     18      /tmp/j/
    
  3. or download this
    #!/usr/bin/perl
    
    use strict;
    ...
    }) or die "watch creation failed: $!";
    
    1 while $inotify->poll;