ファイルが更新されたら勝手にspork -makeするやつ
自前のプレゼンツールを作ろうといつも思いつつ結局時間に追われてついついSporkを使ってしまっています。
しょっちゅうファイル更新するたびにspork -make打つのもめんどくさいので、ちょっと書いてみました。最近地味にFilesys::Notify::Simple期です。
use strict; use warnings; use Filesys::Notify::Simple; use Spork; use lib 'lib'; while ( 1 ) { my $watcher = Filesys::Notify::Simple->new(['.']); $watcher->wait(sub {}); Spork->new->load_hub->command->process('-make', @ARGV); }