my $hodown = @downhosts;
my $houp   = @uphosts;

print "There are $hodown hosts down\n";
print "There are $houp hosts alive\n\n";