Web crawler simples em Perl
Publicado por Perfil removido (última atualização em 29/07/2013)
[ Hits: 5.451 ]
Este script procura links e paths presentes em um determinado site.
:)
#!/usr/bin/perl -w use WWW::Mechanize; use Term::ANSIColor; # This crawler find only link # # By KoubackTr # Follow-me http://www.twitter.com/kouback_tr_ # Thanks :) print"\n"; print color('yellow'); print <<WcraW; W.CraW Web crawler v1.0 __ __ ___ __ __ / / /\\ \\ \\ / __\\ __ __ _/ / /\\ \\ \\ \\ \\/ \\/ // / | '__/ _` \\ \\/ \\/ / \\ /\\ // /__| | | (_| |\\ /\\ / \\/ \\(_)____/_| \\__,_| \\/ \\/ By KoubackTr - http://twitter.com/kouback_tr_ WcraW #####################//##################### print"\n"; print color('reset'); print color('green'); print""; print"[!]Use EXEMPLE http://www.google.com/ \n"; print"[+]Target>> "; print color('reset'); my $target = <STDIN>; my $craw = WWW::Mechanize->new(); $craw->get($target); my @links = $craw->links(); print"RESULTS:\n"; print"====================================================\n"; print $_->url."\n" foreach @links; print"====================================================\n"; # END #
Buscar Traduções no Google Translate
SMTP Mass Mail - Enviando e-mails em massa para vários endereços a partir de um servidor SMTP
Synner Novo Sys(TCP) Flooder em Perl
Upload de múltiplos arquivos para Imageshack.us
Nenhum comentário foi encontrado.
Como agendar um backup automático do PostgreSQL no Cron evitando o problema de senha
Como preparar o Vim/Neovim para corrigir ortografia em português
Dark Web e Malwares na internet, quanto custa?
Configuração básica do Conky para mostrar informações sobre a sua máquina no Desktop
Como verificar o hash de um arquivo baixado da Internet e como criar um hash
Debian 12 - IPTABLES - removendo NFTABLES
OverWatch 2 - Abrindo portas do jogo no Iptables.
Como instalar o adaptador wifi USB Intelbras ACtion A1200 no Linux Mint
Como normalizar seus arquivos MP3 para que fiquem no mesmo volume
O que você está ouvindo agora? [2] (130)
Adaptado Bluetooth USB que funciona no Linux (27)
[C/C++] BRT - Bulk Renaming Tool
[Shell Script] Criação de Usuarios , Grupo e instalação do servidor de arquivos samba
[Shell Script] Tire screenshots com Scrot facilmente com Zscrot
[Shell Script] DioPSI - Script multidistro para instalar programas
[Shell Script] ARS Vídeos - Cortador de vídeos e webcam shooter