1#!/usr/bin/env perl 2use warnings; 3use strict; 4use File::Basename qw(dirname); 5use UNIVERSAL::require; 6 7BEGIN { 8 Jifty::Util->require or die $UNIVERSAL::require::ERROR; 9 my $root = Jifty::Util->app_root; 10 unshift @INC, "$root/lib" if ($root); 11} 12 13use Jifty::Script; 14$SIG{INT} = $SIG{TERM} = sub { warn "Stopped\n"; exit; }; 15Jifty::Script->dispatch(); 16