Aside from the bless issue everyone else spotted (but I would have TOTALLY missed), isn't there something strange going on here?

our $curl="/usr/bin/curl -G 'http://localhost:8080/v3";

# ...

sub getHosts {
    my $self = shift;
    my $cmd=sprintf("%s/nodes 2>/dev/null",$curl);
[download]

Aren't you going to wind up with a mismatched single quote in $cmd if 'getHosts' gets called? 'getHostsFacts' does it right, it looks like...