What platform and perl? It works okay for me (Linux x86 2.4.20 and perl 5.8.2). It does leave a zombie process (check out the docs for that warning) that eventually cleans up when the ping times out. You might be better served with Net::Ping rather than the system ping.