The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#!/usr/bin/env perl
use warnings;
use strict;
use File::Basename qw(dirname); 
use UNIVERSAL::require;

use Jifty;
use Jifty::Script;

local $SIG{INT} = sub { warn "Stopped\n"; exit; };
Jifty::Script->dispatch();