I am trying devices with Perl using
http://dev.zenoss.org/trac/wiki/HowToAddDevice as a reference.
I am using the below in my Perl code
$serv = RPC::XML::Client->new('
http://admin:[EMAIL PROTECTED]:8080/zport/dmd/DeviceLoader');
print $serv->simple_request('loadDevice',
RPC::XML::string->new('myhost.mydomain'), # device
name
RPC::XML::string->new(''), # device Path
RPC::XML::string->new(''), # Tag
RPC::XML::string->new(''), # serail number
RPC::XML::string->new(''), # zSnmpCommunity
RPC::XML::string->new(''), # zSnmpPort
RPC::XML::string->new(''), # zSnmpVer
RPC::XML::string->new(''), # rackSlot
RPC::XML::string->new(''), # productionState
RPC::XML::string->new(''), # comments
RPC::XML::string->new(''), # hwManufacturer
RPC::XML::string->new(''), # hwProductName
RPC::XML::string->new(''), # osManufacturer
RPC::XML::string->new(''), # osProductName
RPC::XML::string->new(''), # locationPath
RPC::XML::string->new(''), # groupPaths
RPC::XML::string->new(''), # systemPaths
RPC::XML::string->new(''), # statusMonitors
RPC::XML::string->new(''), # performanceMonitor
RPC::XML::string->new('none') # discoverProto
);
I get no Perl error and the system (myhost.mydomain) does not get added. Am
I using the function wrong? How do I tell if there is an error in the
call? Sorry, I have been tasked to get this done today and have had many
interruptions and need some advice.
Thank you,
--
Jamie Bohr
_______________________________________________
zenoss-users mailing list
[email protected]
http://lists.zenoss.org/mailman/listinfo/zenoss-users
