Ping en perl

Bonjour,

Net::Ping fait partir des core modules, il est donc utilisable sans qu'il soit nécessaire de l'installer à partir de CPAN ou d'un autre gestionnaire de modules.

Son utilisation est décrite à la documentation : https://perldoc.perl.org/Net::Ping

Cela donne un code comme suit pour un test simple :

#!/usr/bin/perl

use warnings;
use strict;

use Net::Ping;

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

Dal

Salut,

tu peux demander à perl de faire le ping à ta place, en utilisant la commande windows, lancée par perl...

$REP = 'c:\windows\system32\ping 192.168.0.1' 

La commande est entre back-quote et non entre simple quote.

A+ blux

 "Les cons, ça ose tout.
C'est même à ça qu'on les reconnait"

Que ce soit sous Windows ou Linux, le langage de programmation est le même, ça n'a aucun rapport.

Maintenant, je ne connais pas du tout le langage Perl, mais Google m'a trouvé quelques solutions :

https://www.google.fr/search?q=faire+un+ping+en+perl&ie=utf-8&oe=utf-8&rls=org.mozilla:fr-FR:official&client=firefox-a&gfe_rd=ctrl&ei=MfIeU-63O8uK8QeRoICwBQ&gws_rd=cr

Il te faut un module, et la syntaxe dépend donc du module que tu vas choisir.

C'est vachement bien Google !

j'ai cherché sur le net mais pas trouver grand chose sur perl sous windows

plus sous linux ;

je voulais juste la bonne syntaxe de ping

http://www.laissemoichercherca.com/?q=ping%20perl

Sérieux ?