On Tuesday, June 11, 2002, at 03:02  PM, David T-G wrote:

> Bob --
>
> ...and then bob ackerman said...
> %
> % i am trying to login to DI-704 DLink router.
>
> Why was this in the "killing idle users" thread instead of in your
> "get external IP from D-Link router" thread?  It makes it tough to follow
> what you're doing, not to mention distracting...
>
> It looks like you're not even intending to be in that thread but just
> starting a new one, in which case it shouldn't be in *any* thread (though
> I wouldn't consider that the wisest approach, either).

i don't know what i did wrong. i just sent it to beginners group. as usual.

> Your code doesn't jump out at me as having any problems, though I see
> that you'r enow using an account where before you said you weren't.  Do
> you get any other output that you could show us instead of just letting
> the code fall through to "login failed"?

this is dump of object returned from $ua->request($req):
$VAR1 = bless( {
                  '_request' => bless( {
                                         '_method' => 'POST',
                                         '_headers' => bless( {
                                                                'user-agent'
  => 'libwww-perl/5.64'
                                                              }, 
'HTTP::Headers' ),
                                         '_uri' => bless( do{\(my $o = 
'http://192.168.0.1/cgi-bin/logi')}, 'URI::http' ),
                                         '_content' => [
                                                         'RC',
                                                         '@D',
                                                         'ACCT',
                                                         'root',
                                                         'PSWD',
                                                         '71:29:26',
                                                         'URL',
                                                         'admin'
                                                       ]
                                       }, 'HTTP::Request' ),
                  '_headers' => bless( {
                                         'client-date' => 'Tue, 11 Jun 2002 
22:51:46 GMT'
                                       }, 'HTTP::Headers' ),
                  '_msg' => 'Not a SCALAR reference',
                  '_rc' => 500,
                  '_content' => ''
                }, 'HTTP::Response' );

see anything interesting there?
   [rda]

> :-D


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to