Web crawler simples em Perl
Publicado por Perfil removido (última atualização em 29/07/2013)
[ Hits: 5.929 ]
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 #
VimeoTheSapo -Baixe videos do Vimeo e do sapo
PDF completo com todas as páginas do Diário Oficial do Estado de Goiás
Perl Check Port - Entenda melhor os sockets
Nenhum comentário foi encontrado.
Boas Práticas e Padrões Idiomáticos em Go e C
Vale a pena ter mais de uma interface grafica no seu Linux?
Estrutura e Funcionamento de um Ebuild no Gentoo Linux
Copiar Para e Mover Para no menu de contexto do Nautilus e Dolphin
Dotando o Thunar das opcoes Copiar para e Mover para no menu de contexto
Usando o ble.sh (Bash Line Editor) no lugar do bash completion
Montagem pré automática de HD externo usb em NTFS não funciona no Debian Trixie - Solução
Instalação Dual Boot Linux+Windows 11 (4)
No Ubuntu 26.04, sudo passou a mostrar os asteriscos ao digitar por pa... (5)
Como instalar Warsaw no Gentoo? (0)
Como insiro e excluo um elemento XML e JSON ao código Javascript (1)









