foreach $row ( @{$ref} ) {
     my $pid = $pm->start(@$row->[0]) and next;
     my $out = `./alert_main.pl -h $row->[0] -p $passId`;
     print $out;
     print "\n";
     $pm->finish($row);
 }