[Tens de ter uma conta e sessão iniciada para poderes visualizar esta imagem]
para quem gosta de v filme xxx no site fapdu (http://fapdu.com/) ai um script para baixar ^^
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
para quem gosta de v filme xxx no site fapdu (http://fapdu.com/) ai um script para baixar ^^
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
- Código:
#!/usr/bin/perl
#coder: kõdo no kami
#forum: http://endoffile.umforum.net
#site download: http://fapdu.com/
use WWW::Mechanize;
print "==========================\n" .
" FTS fapdu Down\n" .
"==========================\n\n" .
"baixando aguarde...\n";
$kodo = WWW::Mechanize->new;
$kodo->get($ARGV[0]);
@kami = $kodo->content =~ /"file" : "(.*)", "icons" : "/s;
@nome = $kami[0] =~ /http:\/\/cdn-w.fapdu.com\/FapDu\/v\/(.*)\?e=/;
$kodo->get($kami[0],":content_file"=>$nome[0]);
print "baixo com sucesso!!!\n";
Última edição por Kodo no Kami em Sáb Fev 22, 2014 8:17 am, editado 1 vez(es)