use strict;
use warnings;
-use Test::More tests => 3;
+use Test::More tests => 4;
use Data::Dump qw(dump);
use lib 'lib';
TX => 798,
}
}), 'ADSL';
+diag dump($r);
+ok my $r = $o->ping('job',{
+ip => '127.0.0.1',
+username => 'nobody',
+rtt => 0.042,
+}), 'ping';
diag dump($r);