#!/usr/bin/env perl
use strict;
use File::Basename qw(dirname);
use UNIVERSAL::require;
use Jifty;
local $SIG{INT} = sub { warn "Stopped\n"; exit; };
Jifty::Script->dispatch();