A Perl interface to the Cisco UCS XML API