Reload browser when static files get modified

gistfile1.pl

# ... snip ...

{
    use Plack::Loader::Restarter;

    no warnings 'redefine';
    my $orig = \&Plack::Loader::Restarter::_fork_and_start;
    *Plack::Loader::Restarter::_fork_and_start = sub {
        my ($self, $server) = @_;
        my $restart = exists $self->{pid};

        $orig->($self, $server);

        if ($restart) {
            system(q{osascript -e 'tell application "Google Chrome" to reload active tab of window 1'});
            warn 'Your browser has been reloaded!';
        }
    }
}

my $runner = Plack::Runner->new;
$runner->parse_options(
    '--server' => 'HTTP::Server::Simple',
    '--port'   => $port || 3000,
    '--app'    => 'script/app.psgi',
    '--Reload' => join(',', glob("$FindBin::Bin/../static", "$FindBin::Bin/../templates"),
);
$runner->run;