Help for this page

Select Code to Download


  1. or download this
    /usr/bin/perl-MObject -le 'my $cIn the past, I'd keep track of my  = O
+bject->new("192.168.1.63"); $c->ping() or die $c->errstr();'
soap:Server, invalid login/password
 at -e line 1.
 at -e line 1.
  2. or download this
    # Print Debug output
sub p_debug {
...
  $self->{'INDENT'}--;
  return $result;
}
  3. or download this
    /usr/bin/perl-MObject -le 'my $cIn the past, I'd keep track of my  = O
+bject->new("192.168.1.63"); $c->ping() or die $c->errstr();'
DEBUG: 0.0033 Object::echo(): sending data to soap server to be echoed
+ back.
...
DEBUG: 1.5346   Object::login(): authenticated.
DEBUG: 2.9340  Object::ping(): SOAP interface up.
DEBUG: 3.1558 Object::echo(): complete.