in reply to Perl ICMP ping multiple servers connect availability check simultaneously
See AnyEvent::Ping and AnyEvent::FastPing for an example of how to do this for 500 machines in parallel.