seja bem vindo ao forum eof, caso nao seja cadastrado se cadastre para poder visualizar todo o conteudo ^^

Participe do fórum, é rápido e fácil

seja bem vindo ao forum eof, caso nao seja cadastrado se cadastre para poder visualizar todo o conteudo ^^
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Você não está conectado. Conecte-se ou registre-se

 » Servidores / Cliente » Proxy / VPN / Tunelamento » [source] fts proxylist

[source] fts proxylist

Ir para baixo  Mensagem [Página 1 de 1]

1[source] fts proxylist Empty [source] fts proxylist Sáb Fev 01, 2014 4:38 pm

Kodo no Kami

Kodo no Kami
master
master

[Tens de ter uma conta e sessão iniciada para poderes visualizar esta imagem]

esse script mostra uma lista de proxy

[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]

Código:
#!/usr/bin/perl
#coder: kõdo no kami
#contato: www.facebook.com/hacker.fts315

use WWW::Mechanize;
use URI::Escape;

$kodo = WWW::Mechanize->new;
$kodo->agent("Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/30.0.1599.66 Safari/537.36");
$kodo->get("http://www.ip-adress.com/proxy_list/");
@kami = $kodo->content =~ /a href="\/Proxy_Details\/(.*):\w+"/g;
@fts = $kodo->content =~ /a href="\/Proxy_Details\/.*:(\w+)"/g;
@lol = $kodo->content =~ /<img src="\/flags\/(.*).png">.*<\/td>/g;

print "=============================\n" .
   "      FTS ListProxy \n" .
   "=============================\n\n";

$cont = 0;
foreach(@kami)
{
   print $kami[$cont] . " (" . $lol[$cont] . ") " . $fts[$cont] . "\n";
   $cont++;
}

https://endoffile.umforum.net

Ir para o topo  Mensagem [Página 1 de 1]

 » Servidores / Cliente » Proxy / VPN / Tunelamento » [source] fts proxylist

Permissões neste sub-fórum
Não podes responder a tópicos