Tengo hecho esto, pero claro, se ejecuta una vez y no hace nada más, por eso no detecta ningún cambio.
Te dejo el código:
- #!/usr/bin/perl
- use File::ChangeNotify;
- $dirComplete="C:/Users/Gordoa/Documents/UNI/4ºCurso/ProyectoFinGrado/server/public_html/AndroidDataMining/iLogand";
- my $watcher = File::ChangeNotify->instantiate_watcher ( directories => [$dirComplete]);
- if ( my @events = $watcher->new_events() )
- {
- print("habido un cambio\n");
- }
¡Gracias de antemano!
