¿Gano algo cuando transformo mi $url
de esta manera: $url = URI->new($url)
?¿Qué gano al filtrar las URL a través del módulo URI de Perl?
#!/usr/bin/env perl
use warnings; use strict;
use 5.012;
use URI;
use XML::LibXML;
my $url = 'http://stackoverflow.com/';
$url = URI->new($url);
my $doc = XML::LibXML->load_html(location => $url, recover => 2);
my @nodes = $doc->getElementsByTagName('a');
say scalar @nodes;
"Puede detectar URL inválidas (aunque debe desactivar los bits sin esquema)" - Me gustaría hacer eso, pero ¿cómo? He encontrado que el constructor de URI es muy liberal en lo que se espera, lo que puede deberse a que trata muchos esquemas. Estoy buscando algo para validar una URL HTTP/S. Debería ser fácil escribir algo que haga el trabajo, pero odiaría reinventar la rueda cuando el módulo 'URI' está ahí para hacer el trabajo por mí. – Lumi