lib/ に変更をくわえたら自動的に Q4M のワーカープロセスが再起動してくれると便利だなーとおもったので、つくった。Filesys::Notify::Simple が、前つかってたやつよりもシンプルでいいかんじなインターフェイスなのがよかった。 #!/usr/bin/perl use strict; use warnings; use POSIX ':sys_wait_h'; use Getopt::Long; use Filesys::Notify::Simple; use Pod::Usage qw/pod2usage/; # ------------------------------------------------------------------------- # configuration part my $restart = ['.']; my $signal =