(use eping)

(if (eping '127.0.0.1)
  (exit 0)
  (error 'eping "Unable to ping localhost"))