Recherche:

Execution du script :



./switch2.pl
Line: Fa0/1 38695873 91876 152942 6137
Key: Fa0/1
InOctets => 38695873, InUcastPkts => 91876, InMcastPkts => 152942,...

Bonjour Philou67430,

Entre temps j'ai récrit mon script PERL pour ne plus passer par un serveur SSH mais directement me connecter sur le switch. La numération à changer mais cela reste la même...

Bonjour,

Je n'arrive pas vraiement à comprendre l'erreur "uninitialized value in anonymous hash" ou à trouver une explication qui me permettrait d'avancer...

En général quel est ce type...

Je viens de faire les modifications, voici les erreurs :



Use of uninitialized value in anonymous hash ({}) at ./test.pl line 49.
Use of uninitialized value in anonymous hash ({}) at ./test.pl...

Si elle me retourne bien :



N° Valeur1-1 Valeur2-1 Valeur3-1 Valeur4-1
id0/1 1370380983 224275 5977182 11519416
id0/2 ...

Cela ne change pas :oops:

Même erreurs :


Use of uninitialized value in anonymous hash ({}) at ./test.pl line 48.
Use of uninitialized value in say at ./test.pl line 53.

Je me base sur ton code Philou67430



my $command="";
$command.=$_ while (<$chan2>);
my @res=split(/ +/,$command);

my %var;
our ($a, $b);

Bonjour,

Ok je déclare mes variables avec "my" mais j'obtiens d'autres erreurs :



Use of uninitialized value in anonymous hash ({}) at ./test.pl line 48.
Use of uninitialized value in say...

Merci à vous deux !

Je débute avec Perl c'est pas encore facile pour moi :aie:

Quand j'utilise use strict; j'ai l'erreur suivante :



Global symbol "$ip" requires explicit package name at...

Autant pour moi magicshark :roll:

En fait je n'avais pas le bon split (/ / au lieu de / +/)

Donc maintenant j'ai 276 variables...


id0/2';
$VAR272 = '39183049336';
$VAR273 = '94325734';

@magicshark

Oula :roll: En fait Dumper place bien les valeurs dans les variables... Mais...

Comment récupérer les valeurs dans les variables car sur le parcours Dumper à créé 2467 variables...

Bonsoir Philou67430,

Non en fait c'est le résultat d'une commande que je place dans une variable.

Le sépateur est plusieurs espace (@res=split(/ +/,$command);)

Bonsoir,

Dans mon script PERL je voudrais récupèrer et afficher certaines valeurs stocké dans une variable.

La variable est retourné de cette façon :



N° Valeur1-1 ...