|
From: Peter P. <pr...@us...> - 2006-12-01 18:11:04
|
Update of /cvsroot/pyxida/Pyxida/bin In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv13907/bin Modified Files: query.pl Log Message: Fixed xmlrpc access Fixed bug where JPCapPinger returns wrong type of packet Index: query.pl =================================================================== RCS file: /cvsroot/pyxida/Pyxida/bin/query.pl,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** query.pl 1 Dec 2006 17:33:15 -0000 1.2 --- query.pl 1 Dec 2006 18:10:54 -0000 1.3 *************** *** 5,12 **** use Frontier::Client; ! use Aux; ! print "rm Aux\n"; ! # e.g. query.pl -l http://righthand.eecs.harvard.edu:55501 my $usage = "query.pl [options] url\n"; --- 5,14 ---- use Frontier::Client; ! use Data::Dumper; ! #use Aux; ! #print "rm Aux\n"; ! ! # e.g. query.pl http://righthand.eecs.harvard.edu:55501 my $usage = "query.pl [options] url\n"; *************** *** 35,39 **** print "local\n"; my $hash = $server->call("pyxida.getLocalCoord"); ! &Aux::printHash($hash); } elsif (defined($para{'r'})) { my $remoteNode = $para{'r'}; --- 37,41 ---- print "local\n"; my $hash = $server->call("pyxida.getLocalCoord"); ! print Dumper($hash); } elsif (defined($para{'r'})) { my $remoteNode = $para{'r'}; |