#!/usr/bin/env perl eval 'exec /usr/bin/env perl -S $0 ${1+"$@"}' if 0; # not running under some shell use warnings; use strict; use File::Basename qw(dirname); use UNIVERSAL::require; BEGIN { Jifty::Util->require or die $UNIVERSAL::require::ERROR; my $root = Jifty::Util->app_root; unshift @INC, "$root/lib" if ($root); } use Jifty::Script; $SIG{INT} = $SIG{TERM} = sub { warn "Stopped\n"; exit; }; Jifty::Script->dispatch();