>perl -e "use NET::Ping; $p = Net::Ping->new();"
Can't get tcp protocol by name at -e line 1

>perl -e "use NET::POP3; $pop = Net::POP3->new('192.67.198.62'); $pop->login('me');"
Can't call method "login" on an undefined value at -e line 1.

>ping 192.67.198.62

Pinging 192.67.198.62 with 32 bytes of data:

Reply from 192.67.198.62: bytes=32 time=80ms TTL=245
Reply from 192.67.198.62: bytes=32 time=60ms TTL=245
Reply from 192.67.198.62: bytes=32 time=130ms TTL=245
Reply from 192.67.198.62: bytes=32 time=60ms TTL=245

Ping statistics for 192.67.198.62:
    Packets: Sent = 4, Received = 4, Lost = 0 (0% loss),
Approximate round trip times in milli-seconds:
    Minimum = 60ms, Maximum =  130ms, Average =  82ms