0

I am trying to use a http proxy in my perl script, specifically tinyproxy. I keep getting an error "error in socket creation". can someone point out my errors and how to fix them please, would be very grateful.

my $mech = WWW::Mechanize->new();
  my $socket = new IO::Socket::INET (
  LocalHost => '127.0.0.1',
  LocalPort => '8888',
  Proto => 'http',
  Listen => 5,
  Reuse => 1

) or die "ERROR in Socket Creation : $!\n";

  $socket->proxy(['http'], 'http://127.0.0.1:8888');
  $mech->get("http://blockexplorer.com/q/getreceivedbyaddress/".$btcaddress);   # Check transactions on bitcoin address
  my $getreceived = $mech->content;
1
  • How is this related to Tor?
    – user3524
    Jan 5, 2017 at 13:58

1 Answer 1

0

It is covered exactly at the WWW::Mechanize FAQ and you need to add before connecting a strings like this:

$mech->no_proxy('localhost');

$mech->proxy('http','http://proxy-ip:proxy-port');

Be warned - it sets http proxy only, so if any of redirects e.t.c. will use HTTPS, you need to set https proxy too like http one.

2
  • Thank you that did the trick. I am sending requests and often get "too many request" connection refused. Would i be able to install proxychains, say on 127.0.0.1:8888, then use this local address in the solution above in the script. Would it then change to a new proxy when connection is refused?for example sleep (60) then attempt to reconnect Jan 7, 2017 at 1:28
  • not by itself - you will need to use either cURL or LWP::UserAgent to make a timeout&state tracking properly. Proxychains are actually not necessery there, but if you will use them - Tor's socks proxy must be strictly the first one in chain, but I do recommend you to use Tor alone : it has it's control protocol, it's a very good tool - read the docs ;)
    – Alexey Vesnin
    Jan 7, 2017 at 16:00

You must log in to answer this question.

Not the answer you're looking for? Browse other questions tagged .