Je cherche un moyen d'extraire les urls d'une page et de les afficher dans un fichier texte.

Question

Je cherche un moyen d'extraire les URLs d'une page Web et de les afficher dans un fichier texte. E.g si une page contient plusieurs http://example.com/article Je veux saisir ces deux URLs et le sortir dans un fichier texte.

Answer 1

Jetez un oeil à WWW::Mechanize.

code Exemple:

use strict; 
use warnings; 
use 5.010; 

use WWW::Mechanize; 

my $mech = WWW::Mechanize->new(); 
$mech->get('http://example.com/example'); 
foreach my $link ($mech->find_all_links()) { 
    say $link->url_abs(); 
} 

Answer 2

Utilisation HTML::SimpleLinkExtor:

use strict; 
use warnings; 

use HTML::SimpleLinkExtor; 

my $extor = HTML::SimpleLinkExtor->new(); 
$extor->parse_url('http://example.com/article'); 
my @links = $extor->absolute_links();