Also, it is my understanding that ping uses ICMP

Net::Ping supports six different types of ping, and TCP is the default.

... which you'd know if you'd at least skimmed its documentation before posting.