/usr/bin/perl-MObject -le 'my $cIn the past, I'd keep track of my  = Object->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: 0.0034  Object::ping(): pinging SOAP interface.
DEBUG: 0.0275   Object::login(): authenticating on service.
DEBUG: 1.5343   Object::login(): token 828609a7e43e4ce22131694bed3f6a71.
DEBUG: 1.5346   Object::login(): authenticated.
DEBUG: 2.9340  Object::ping(): SOAP interface up.
DEBUG: 3.1558 Object::echo(): complete.