processar Lynx.pl
Publicado por Fábio Berbert de Paula 13/11/2002
[ Hits: 4.884 ]
Homepage: https://www.instagram.com/alexabolada/
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"; }
SMTP Mass Mail - Enviando e-mails em massa para vários endereços a partir de um servidor SMTP
IPloc - Informações e localização de um determinado endereço IP
Nenhum comentário foi encontrado.
Agora temos uma assistente virtual no fórum!!! (247)
Manutenção de sistemas Linux Debian e derivados com apt-get, apt, aptitude e dpkg
Melhorando o tempo de boot do Fedora e outras distribuições
Como instalar as extensões Dash To Dock e Hide Top Bar no Gnome 45/46
Como Atualizar Fedora 39 para 40
Instalar Google Chrome no Debian e derivados
Consertando o erro do Sushi e Wayland no Opensuse Leap 15
Instalar a última versão do PostgreSQL no Lunix mantendo atualizado
Flathub na sua distribuição Linux e comandos básicos de gerenciamento
Problema Envio email GLPI Versao 10.0.15 (2)
Microfone do meu headset não é recinhecido. Meu notebook é um Acer Asp... (9)
redirecionando saida de comando touch para o AWK[AJUDA] (6)