docs/samples/perl/sample.pl


1
2
3
4
5
6
7

use Net::Libproxy;

$p = new Net::Libproxy;
$proxies = $p->getProxies('http://www.google.com');
foreach my $proxy (@$proxies) {
  print $proxy."\n";
}