gistfile1.txt

foreach my $host(@host_list){
    $pm->start and next;
    my @all_status = get_jmx_value($host,$jolokia_port,$threshold);
    print "$host" . "\n";
    foreach my $status(@all_status){
        print $status . "\n";
    }
    $pm->finish(0, { 'host' => $host, 'all_status' => \@all_status});
}



$ perl cassandra_pending_jolokia.monitor -t 1 -h 10.172.105.1 10.172.105.2
10.172.105.1
10.172.105.1 ReplicateOnWriteStage pending threshold over!!1->5
10.172.105.1 ReplicateOnWriteStage pending threshold over!!1->5
10.172.105.2
Pending is NG