#!/usr/bin/env perl use lib 'lib'; use LWP::Simple; use JSON; use utf8; use warnings; use constant debug => $ENV{DEBUG}; use App::gh::Utils; use App::gh::Command; $|=1; binmode STDOUT, ':utf8'; my $act = shift; $SIG{INT} = sub { exit; }; App::gh::Command->invoke( ($act || 'help') , @ARGV ); exit;