processar Lynx.pl
Publicado por Fábio Berbert de Paula 13/11/2002
[ Hits: 4.902 ]
Homepage: https://mestrefabio.com
Script usado para extrair todos os links e imagens contidos no código HTML
de determinada URL. O navegador lynx é usado no auxílio da tarefa, ou melhor,
ele que processa os links, nós apenas formatamos a saída :)
#!/usr/bin/perl # +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ # processarLynx.pl # # Script usado para extrair todos os links e imagens contidos # no código HTML de determinada URL. O navegador lynx é usado no # auxílio da tarefa, ou melhor, ele que processa os links, nós # apenas formatamos a saída :) # # Requisitos: # * lynx # # # # Programado por Fábio Berbert de Paula <fabio@vivaolinux.com.br> # Na web em: www.vivaolinux.com.br # # Rio de Janeiro, 24 de Julho de 2002 # ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ use strict; my $lynx = '/usr/bin/lynx'; my $url = shift; if (!$url) { print "Você precisa informar uma URL !\nUse: $0 endereco_da_pagina\n\n"; exit(0); } my $addlink = 0; my $out = `$lynx -dump -image_links $url`; foreach my $linha (split(/\n/,$out)) { # se a linha iniciar com a string Referências ou References if ( $linha =~ /^(Referências|References)/ ) { $addlink = 1; } # pule para o próximo enquanto não chegarmos a parte que mostra os links if (!$addlink) { next; } # remova os espaços em branco do início da linha do {} while ($linha =~ s/^ //); # expressão regular para pegar apenas o link processado if ($linha !~ /^[0-9]{1,5}\. (.*)$/) { next; } print $1 . "\n"; }
Descubra se seu e-mail ou conta foi "pwned"
SMTP Mass Mail - Enviando e-mails em massa para vários endereços a partir de um servidor SMTP
Avisar por e-mail se o IP da conexão ADSL mudar
Pesquisar palavras no Diário Oficial da União
Nenhum comentário foi encontrado.
Como escolher o melhor escalonador de CPU para melhorar o desempenho da máquina
Curiosidade sobre DOOM Guy e Isabelle de Animal Crossing
Inicializando servidor Ubuntu na AWS e rodando apache em Container
Instalando TeamViewer no Debian 12
Conheça o Octopi, outro frontend para o Pacman com acesso ao AUR (Arch Linux e derivados)
Terminal transparente no Debian 12 com interface i3wm usando Xfce4-Terminal e Compton
Eu estou com problemas para usar o QBASIC no Dosbox X (3)
Tibia não pode ser aberto em virtual machine (14)
Após atualização do Ubuntu 22.04.4 LTS perdi a instalação da placa de ... (3)
Não consigo iniciar o Linux normalmente (5)
Notebook com Ubuntu 22.04.4 se reinicia após curtos períodos. (3)