data/extractapi.pl

   1 #!/usr/bin/perl -w
   2
   3 use strict;
   4 use PVE::RESTHandler;
   5 use PVE::API2;
   6 use JSON;
   7
   8 my $tree = PVE::RESTHandler::api_dump('PVE::API2');
   9
  10 print "var pveapi = " . to_json($tree, {pretty => 1}) . ";\n\n";
  11
  12 exit(0);