Web crawler simples em Perl
Publicado por Perfil removido (última atualização em 29/07/2013)
[ Hits: 5.587 ]
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 #
Obtendo o IP público (Internet) usando o Perl
Buscar Traduções no Google Translate
API do Bing para traduzir textos
Nenhum comentário foi encontrado.
Compartilhando a tela do Computador no Celular via Deskreen
Como Configurar um Túnel SSH Reverso para Acessar Sua Máquina Local a Partir de uma Máquina Remota
Configuração para desligamento automatizado de Computadores em um Ambiente Comercial
Efeito "livro" em arquivos PDF
Como resolver o erro no CUPS: Unable to get list of printer drivers
Flatpak: remover runtimes não usados e pacotes
Mudar o gerenciador de login (GDM para SDDM e vice-versa) - parte 2
estou com chromebook legalzinho. (2)
Estou com sede em aprender sobre o nosso querido Linux. (1)
big linux sem audio como resolver (2)
Como faz para dar um update-grub por shell script [RESOLVIDO] (3)
[Python] Automação de scan de vulnerabilidades
[Python] Script para analise de superficie de ataque
[Shell Script] Novo script para redimensionar, rotacionar, converter e espelhar arquivos de imagem
[Shell Script] Iniciador de DOOM (DSDA-DOOM, Doom Retro ou Woof!)
[Shell Script] Script para adicionar bordas às imagens de uma pasta