--- /dev/null
+#!/usr/bin/perl
+
+use lib '.';
+use strict;
+use warnings;
+use PVE::RESTHandler;
+
+use Data::Dumper;
+
+use PVE::HA::Resources;
+
+
+my $private = PVE::HA::Resources::private();
+my $properies = $private->{propertyList};
+delete $properies->{type};
+delete $properies->{sid};
+
+print PVE::RESTHandler::dump_properties($properies);