Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change

Re: log into a website via perl client

by newrisedesigns (Curate)
on Feb 06, 2004 at 17:56 UTC ( #327167=note: print w/ replies, xml ) Need Help??

in reply to log into a website via perl client

Simple question, no simple solution.

If your router is like mine (dLink) it uses Basic Authentication (mentioned by Sol-Invictus) to allow access to the router's functions. What you'll have to do is provide your password like mentioned above, then use LWP to do either a GET or POST (no difference, really) to the page on your router in which you want to modify settings. You'll send the variables in the GET/POST request, and what should be returned is the HTML of the page confirming the changes.


use LWP; use HTTP::Request::Common; my $ua = LWP::UserAgent->new(); my $resp = $ua->request(GET ''); if($resp->is_success){ # returned 200; request sent/page received print $resp->content; #content of page returned, check this } #to see if it looks like your router's "settings changed" page. else{ print "Couldn't fetch page. Something's wrong!!!\n"; }

Read the documentation on LWP. It's really useful stuff.
Hope that helps. Best of luck to you.

John J Reiser

Comment on Re: log into a website via perl client
Download Code

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (5)
As of 2015-12-01 04:48 GMT
Find Nodes?
    Voting Booth?

    What would be the most significant thing to happen if a rope (or wire) tied the Earth and the Moon together?

    Results (794 votes), past polls