I Am using :

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 evalby
+tes);
   # 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;
[download]