]>
git.proxmox.com Git - librados2-perl.git/blob - test.pl
1826147af64d0dbdb839d088c1cee8bf0d0c5948
12 my $rados = PVE
::RADOS
::new
();
14 my $res = $rados->mon_command({ prefix
=> 'get_command_descriptions'});
17 $res = $rados->mon_command({ prefix
=> 'mon dump', format
=> 'json' });
19 $res = $rados->mon_command({ prefix
=> 'mon dump', format
=> 'json' });
22 my $stat = $rados->cluster_stat;