in reply to Ping host

use strict and warnings will help you to answer your question.

In Section Seekers of Perl Wisdom