add API definition

[pve-client.git] / extractapi.pl

diff --git a/extractapi.pl b/extractapi.pl
new file mode 100755 (executable)
index 0000000..36caa28
--- /dev/null
+++ b/extractapi.pl
@@ -0,0 +1,13 @@
+#!/usr/bin/perl
+
+use strict;
+use warnings;
+
+use PVE::RESTHandler;
+use PVE::API2;
+use JSON;
+
+my $tree = PVE::RESTHandler::api_dump_remove_refs(PVE::RESTHandler::api_dump('PVE::API2'));
+print to_json($tree, {pretty => 1, canonical => 1}) . "\n";
+
+exit(0);