Hello,<br><br>I'd like to announce the availability of my Perl bindings for libcman.<br><br>You can grab them from here:<br><br><a href="http://zac.sprackett.com/cman/cluster-cman-0.01.tar.gz">http://zac.sprackett.com/cman/cluster-cman-0.01.tar.gz</a><br>
<br>A simple example script would be as follows:<br><br>use Cluster::CMAN;<br><br>my $cman = new Cluster::CMAN();<br>$cman->init();<br><br>foreach ($cman->get_nodes) {<br>    print "Found a node: " . $_->{name} ."\n";<br>
}<br><br>print "Cluster is"<br>   . ($cman->is_quorate() ? "" : " NOT") . " quorate!\n";<br><br>$cman->finish();<br><br>These bindings also fully support both the notification and recv_data <br>
callbacks allowing you to take advantage of them from within perl.<br><br>Please let me know if you have any trouble with them.<br><br>-z<br>