Ping en perl

Résolu/Fermé
reseaux Messages postés 16 Date d'inscription mercredi 14 août 2013 Statut Membre Dernière intervention 11 mars 2014 - Modifié par reseaux le 11/03/2014 à 11:54
reseaux Messages postés 16 Date d'inscription mercredi 14 août 2013 Statut Membre Dernière intervention 11 mars 2014 - 11 mars 2014 à 13:51
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

[Dal] Messages postés 6174 Date d'inscription mercredi 15 septembre 2004 Statut Contributeur Dernière intervention 2 février 2024 1 083
11 mars 2014 à 13:25
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
reseaux Messages postés 16 Date d'inscription mercredi 14 août 2013 Statut Membre Dernière intervention 11 mars 2014
11 mars 2014 à 13:51
merci ,c'est bien ce que je cherchais
0
sipherion Messages postés 1798 Date d'inscription lundi 22 octobre 2007 Statut Membre Dernière intervention 19 décembre 2016 285
11 mars 2014 à 11:57
http://www.laissemoichercherca.com/?q=ping%20perl

Sérieux ?
0
reseaux Messages postés 16 Date d'inscription mercredi 14 août 2013 Statut Membre Dernière intervention 11 mars 2014
Modifié par reseaux le 11/03/2014 à 12:07
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
0
sipherion Messages postés 1798 Date d'inscription lundi 22 octobre 2007 Statut Membre Dernière intervention 19 décembre 2016 285
11 mars 2014 à 12:25
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 !
0
reseaux Messages postés 16 Date d'inscription mercredi 14 août 2013 Statut Membre Dernière intervention 11 mars 2014
11 mars 2014 à 13:49
merciiii
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
blux Messages postés 26001 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 24 avril 2024 3 289
Modifié par blux le 11/03/2014 à 12:31
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"
0
reseaux Messages postés 16 Date d'inscription mercredi 14 août 2013 Statut Membre Dernière intervention 11 mars 2014
Modifié par reseaux le 11/03/2014 à 13:49
merciiii blux pour votre réponse
0