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.
Pseudo-code:
use LWP;
use HTTP::Request::Common;
my $ua = LWP::UserAgent->new();
my $resp = $ua->request(GET 'http://192.168.0.1/admin.cgi');
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.
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.
|