Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot
 
PerlMonks  

Answer: How do I programatically follow redirects?

by gunder (Novice)
on Apr 04, 2003 at 09:37 UTC ( #248013=categorized answer: print w/replies, xml ) Need Help??

Q&A > CGI programming > How do I programatically follow redirects? - Answer contributed by gunder

I would maybe try a different approach by accessing site information via TCP sockets? Using (use Socket) you cn verify an alive site by grabing some info from the page if you like... hell I have never tried this, but it should work right? Let me know if it does...

There is a wrapped up IO class called IO::Socket::INET that should for websites...

try

$client = IO::Socket::INET->new("PeerAddr => "the.host.com", PeerPort +=> 80, Type => SOCK_STREAM, Timeout => (How ever long you think it sh +ould wait for a reply)) or die $@;
Then (in case you want to get some data from the connected socket)
bind(SOCKET, $client) or die "bind: $!";
if you get this far without error, then the site should be up and you can read from that socket and should be able to pick out bytes of the HTML markup... I think...

Read more on sockets to get ideas on how to read via $client->recv($data_read, $flags) or die...

Log In?
Username:
Password:

What's my password?
Create A New User
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (3)
As of 2020-09-26 02:24 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    If at first I donít succeed, I Ö










    Results (141 votes). Check out past polls.

    Notices?