Ping en perl [Résolu/Fermé]

Signaler
Messages postés
16
Date d'inscription
mercredi 14 août 2013
Statut
Membre
Dernière intervention
11 mars 2014
-
Messages postés
16
Date d'inscription
mercredi 14 août 2013
Statut
Membre
Dernière intervention
11 mars 2014
-
Bonjour,

je veux pinger des switch en utilisant le langage perl sous windows 7;

vous pouvez me montrer la syntaxe SVP !

en vous remerciant par avance

5 réponses

Messages postés
5541
Date d'inscription
mercredi 15 septembre 2004
Statut
Contributeur
Dernière intervention
7 mai 2021
933
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
1
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 65492 internautes nous ont dit merci ce mois-ci

Messages postés
16
Date d'inscription
mercredi 14 août 2013
Statut
Membre
Dernière intervention
11 mars 2014

merci ,c'est bien ce que je cherchais
Messages postés
1798
Date d'inscription
lundi 22 octobre 2007
Statut
Membre
Dernière intervention
19 décembre 2016
282
http://www.laissemoichercherca.com/?q=ping%20perl

Sérieux ?
Messages postés
16
Date d'inscription
mercredi 14 août 2013
Statut
Membre
Dernière intervention
11 mars 2014

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
Messages postés
1798
Date d'inscription
lundi 22 octobre 2007
Statut
Membre
Dernière intervention
19 décembre 2016
282
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 !
Messages postés
16
Date d'inscription
mercredi 14 août 2013
Statut
Membre
Dernière intervention
11 mars 2014

merciiii
Messages postés
23763
Date d'inscription
dimanche 26 août 2001
Statut
Modérateur
Dernière intervention
13 janvier 2020
3 057
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"
Messages postés
16
Date d'inscription
mercredi 14 août 2013
Statut
Membre
Dernière intervention
11 mars 2014

merciiii blux pour votre réponse