Beefy Boxes and Bandwidth Generously Provided by pair Networks
Think about Loose Coupling

Re: How to resolve bad hostname error message

by kennethk (Abbot)
on May 02, 2017 at 16:52 UTC ( #1189333=note: print w/replies, xml ) Need Help??

in reply to How to resolve bad hostname error message and share a top level domain, but would be different computers. Try again with
#!/usr/bin/perl use strict; use warnings; use WWW::Mechanize ; my $mech = WWW::Mechanize->new(); foreach my $line (100982..106146) { next if 0.99 > rand ; print "Now processing $line \n" ; my $get_file = " +d=".$line; my $filename = "file_".$line ; open OUT, ">$filename" or die $!; print "file $filename \n"; $mech->get($get_file) ;

As a side note, as long as you are using double quotes, your code will probably read better if you interpolate your variables, a la:

my $get_file = "$l +ine";

You might also consider using a three-argument open and indirect filehandle, particularly since you don't seem to be closing OUT prior to opening the next file.

Also, if you are trawling everything off someone's server, it's considered polite to put a sleep in there. And you should check that you aren't violating terms of service.

#11929 First ask yourself `How would I do this without a computer?' Then have the computer do it the same way.

Replies are listed 'Best First'.
Re^2: How to resolve bad hostname error message
by rachard11 (Acolyte) on May 02, 2017 at 18:12 UTC
    I will use the sleep command as well. Thanks!

Log In?

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://1189333]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others cooling their heels in the Monastery: (2)
As of 2022-01-17 04:12 GMT
Find Nodes?
    Voting Booth?
    In 2022, my preferred method to securely store passwords is:

    Results (51 votes). Check out past polls.