diff options
-rwxr-xr-x | tgsend | 2 | ||||
-rwxr-xr-x | tgserver | 4 |
2 files changed, 2 insertions, 4 deletions
@@ -36,7 +36,7 @@ my $logger = TgLib::Logger->new($VERBOSE); # Fetch token: CLI || env || file $TOKEN ||= fetch_token() or pod2usage(-message => "ERROR: Unable to get bot token ($!).\n", - -verbose => 99, -sections => "AUTHENTICATION"); + -verbose => 99, -sections => "AUTHENTICATION"); # Read text from stdin undef $/; @@ -11,8 +11,6 @@ use Getopt::Long qw(:config auto_version); use Pod::Usage qw<pod2usage>; use Data::Dumper; -use JSON qw<decode_json>; - use FindBin; use lib "$FindBin::Bin/lib"; @@ -35,7 +33,7 @@ my $logger = TgLib::Logger->new($VERBOSE); # If token was not specified in CLI, get it from ENV/file $TOKEN ||= fetch_token() or pod2usage(-message => "ERROR: Unable to get bot token ($!).\n", - -verbose => 99, -sections => "AUTHENTICATION"); + -verbose => 99, -sections => "AUTHENTICATION"); my $cache = TgLib::Cache->new($logger); my $api = TgLib::Api->new($TOKEN, $logger); |