Could you assist me on followings:

I am trying to run a simple test to get some understanding of VBTK
module but I am getting following errors

Error:
Name "VBTK::Controller::OLDSTDERR" used only once: possible typo at
line 347.
testing 135....
20090123-15:55:50 - Error: Bad result from vbserver - 500 Can't connect
to vbserver:4712 (Bad hostname 'vbserver')

Code :
#!/opt/ActivePerl-5.8/bin/perl
use VBTK::Wrapper::Ping;
$host = "135.....";
print "\ntesting $host\n";
$obj = new VBTK::Wrapper::Ping(Host => $host );
$obj->addVBObj(VBObjName => $pingList{$host});

# Add one more for an external machine which has a high latency so can't
# use the default settings
$obj = new VBTK::Wrapper::Ping(Host => '192....',Interval => 60 *
5,Timeout => 40 );

$obj->addVBObj(VBObjName => '192.....',Rules => {'($data[2] > 400 or
$data[3] > 0)' => 'Warn'},);

# Call this at the very end to start looping and checking everything
VBTK::runAll;


Thank you
kam

--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to