processar Lynx.pl
Publicado por Fábio Berbert de Paula 13/11/2002
[ Hits: 4.896 ]
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"; }
Perl Check Port - Entenda melhor os sockets
Postando mensagem no Facebook com Perl
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 Zoom Client no Fedora 40
Instalando Navegador Firefox no Debian 12
Bloqueando propagandas no Youtube e outros sites com o uBlocker Origin
Envio de link pelo whatsapp (1)
Pi Network.... alguém minera? (8)