#!/usr/bin/perl
use strict;
use warnings;
use Net::Ping;

my $target   = 'perlmonks.org';
my $ping_obj = Net::Ping->new();

print "Net::Ping version is $Net::Ping::VERSION\n";

if ($ping_obj->ping($target)) {
    print "Yes, I can ping $target\n";
} else {
    print "No, I cannot ping $target\n";
}
[download]

Prints:

Net::Ping version is 2.36
Yes, I can ping perlmonks.org
[download]

for me. Are you sure your target is reachable?