The following Cluster Perl Script example demonstrates how to perform cluster management using deprecated Resource and Node XML commands.
Cluster.pl
autoRepair
clearLog
controlResource
createClusterResource
deleteClusterResource
getClusterInfo
getClusterReport
getDefaultNames
getLogTimeRange
getNodeInfo
getResourceInfo
getUnassignedNodes
listClusterNodes
listClusterResources
queryLog
setClusterInfo
setNodeInfo
setResourceInfo