> From: Max Maischein > The attached version of my changes adds five lines for every > simple call > to `wget`, trying with HTTP::Tiny first and falling back to > the original > `wget` second: > > + eval { > + require HTTP::Tiny; > + my $http= HTTP::Tiny->new(); > + $http->mirror( $url => $new_file ); the simpler the better HTTP::Tiny->new()->mirror( $url => $new_file ); > + 1 > + } or system wget => $url, '-qO', $new_file;Thread Previous | Thread Next