Guadagno qualcosa quando trasformo il mio $url
in questo modo: $url = URI->new($url)
?Cosa guadagno filtrando gli URL tramite il modulo URI di 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;
"Può rilevare URL non validi (anche se è necessario disattivare i bit senza schema)" - Mi piacerebbe farlo, ma come? Ho trovato che il costruttore di URI è molto liberale in ciò che si aspetta - il che potrebbe essere dovuto al fatto che riguarda molti schemi. Sto cercando qualcosa per convalidare un URL HTTP/S. Dovrebbe essere facile scrivere qualcosa che faccia il lavoro, ma odio reinventare la ruota quando il modulo 'URI' è lì per fare il lavoro per me. – Lumi