use common::sense; # Supposed to be mostly the same, with much lower memory usage, as: # use utf8; # use strict qw(vars subs); # use feature qw(say state switch); # use feature qw(unicode_strings unicode_eval current_sub fc evalbytes); # no feature qw(array_base); # no warnings; # use warnings qw(FATAL closed threads internal debugging pack # portable prototype inplace io pipe unpack malloc # glob digit printf layer reserved taint closure # semicolon); # no warnings qw(exec newline unopened); use Net::SFTP::Foreign; use Getopt::Std; use Config::General; use Fcntl qw(O_RDONLY :mode); use boolean ':all'; use Data::Dumper;