my $ua = new LWP::UserAgent;
my $proxy = "http://112.137.164.232:3128";
$ua->proxy(['https'], $proxy);
$ua->agent('Mozilla/5.0');
my $links = "http://sci-hub.org/";
my $req = new HTTP::Request GET => $links;
my $stuff = $ua->request($req);
print "Content-type: text/html\n\n";
print $stuff->content;

##</code><code>##

Can't connect to sci-hub.org:80 (Connection timed out)

LWP::Protocol::http::Socket: connect: Connection timed out at /usr/share/perl5/LWP/Protocol/http.pm line 41