Web crawler simples em Perl
Publicado por Perfil removido (última atualização em 29/07/2013)
[ Hits: 5.495 ]
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 #
Descobrir operadora de celular
Obtendo o IP público (Internet) usando o Perl
Automatizando o envio de arquivo p/ o FTP !
Nenhum comentário foi encontrado.
Atualizar o macOS no Mac - Opencore Legacy Patcher
Crie alias para as tarefas que possuam longas linhas de comando - bash e zsh
Criando um gateway de internet com o Debian
Configuração básica do Conky para mostrar informações sobre a sua máquina no Desktop
Aprenda a criar músicas com Inteligência Artificial usando Suno AI
Instalando e usando o Dconf Editor, o "regedit" para Linux
Como instalar o navegador TOR no seu Linux
Instalando Zoom Client no Ubuntu 24.04 LTS
validando quandidade de leitura no read[DUVIDA] (2)
Qual a relevancia dos valores de bogomips com os Mhz e Ghz[DUVIDA] (4)
Jogar jogos do Win 10 no Ubuntu (6)
Som parou de funcionar depois de atualizar o kernel do Slackware 15 (1)
Encriptografa... as particoes com LUKS, o que poderia dar errado? (6)