- much easier to test for empty values than to test for no specific keys in a hash
return "invalid HTTP response from Ikano: " . $resp->status_line
unless $resp->is_success;
my $respxml = $resp->decoded_content;
+
+ $xs = new Net::Ikano::XMLUtil(RootName => undef, SuppressEmpty => '');
my $resphash = $xs->XMLin($respxml);
warn "DEBUG RESPONSE\n\tHASH:\n ".Dumper($resphash)."\n\tXML:\n $respxml"
Unfortunately the Ikano API schema has xs:sequence everywhere, so we need to have most elements in a particular order.
This class solves this problem by extending XML::Simple and overriding sorted_keys to provide the element order for each request.
-IMPORTANT: when using this class, XMLOut must have SuppressEmpty => 1 as an option.
-You will break everything otherwise.
+This is a helper class which should not be used directly. It requires particular options in the constructor (SuppressEmpty) which differ for XMLin and XMLout.
=cut