Pinguer une machine distante, et Afficher le résultat

Author:
 #!/usr/local/bin/perl
 
use strict;
 
my $mon_ping = Net::Ping->new("tcp");
 
(defined $mon_ping)