Ok, I'm confused. This is the first time I've used Net::Ping, so let me know if I'm missing something. I tookd this simple code off of the CPAN web site, to get a feel for Net::Ping before I start to write a script with it.

use Net::Ping;
use strict;

my $host="10.6.1.107";

my $p=Net::Ping->new();
    print "$host is alive\n" if $p->ping($host);
$p->close();

$p=Net::Ping->new("tcp");
[download]

When I run it on my windows NT machine with Active Perl and on my Linux box with Active perl, both do not print out if the machine is alive. I understand what the script is doing, I just cannot see where the problem is, if there is one. Did I do something wrong in the syntax?
Just trying to figure out!

curtisb