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;