sporkの更新検知して自動でスライド作ってくれる君

spork_watcher.pl

#!/usr/bin/env perl
use strict;
use warnings;
use Filesys::Notify::Simple;
use Spork;

my $watcher = Filesys::Notify::Simple->new(['./Spork.slides']);
my $spork_command = Spork->new->load_hub->command;
while (1) {
    $watcher->wait(sub {
        $spork_command->process('-make');
    });
}