Discussion :

[linda8080]

Bonjour,

j'aimerai afficher l'indice d'un élément d'un tableau avec perl

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
#!/usr/bin/perl
 
@tablo=(1,2,3,4,5);
 
foreach $tablo(@tablo){
        print "$tablo: $#tablo";
}

mais c'est pas le cas !! je sai sbien que $#corresponds a l'indice du dernier élément du tableau ! mai sj en esais pas comment le faire.

merci pour votre aide.

[Jedai]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
@tablo=(1,2,3,4,5);
 
foreach my $i (0 .. $#tablo){
        print "$tablo[$i] : $i\n";
}

--
Jedaï

[linda8080]

un autre probleme:

j'ai un tableau d'élement en entré, et pour chaque élément je parcours un fichier pour faire des oreration et a la fin de chaque élément d'un tableau, il faut que je sauvegarde le résultat , donc mon code est le suivant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
#!/usr/bin/perl
 open FILE, "test2.txt";
 
@uid=(5, 3, 9);
@res=();
 
 
foreach $uid(@uid){ 
 
     while ($line=<FILE>){
 
	if ($line=~/tcp(.*) uid = $uid[^0-9]/) {
 
		if ($line=~/\[(.*)\](.*)viens de recevoir le paquet(.*)/) {
                      if (not defined $premierTemps){
				$premierTemps = $1;
                              print "$line";
			}
			}
			elsif ($line=~/\[(.*)\](.*)va envoyer  le paquet (.*)/){
			       if (not defined $deuxiemeTemps){	
					$deuxiemeTemps = $1;
			                 print"$line";
			                 $soustraction = $deuxiemeTemps-$premierTemps;                     
 
                                }
 
			 }
 
 
 
		   }
 
        }
 
print"$soustraction";                    
 
}
 
close FILE;

le probleme est que il m'affiche le meme resultat 3 fois !!

[iblis]

Pourquoi veux-tu lire le même fichier 3 fois de suite (ce qu'en fin de compte tu ne fais pas puisqu'il faudrait, par exemple, le fermer et le réouvrir) ?

Il y a sûrement plus simple.

PS Tu n'utilises toujours pas le pragma strict (comme je te le suggérais dans un post précédent) : tu vas avoir du mal à faire des scripts qui fonctionnent.

[linda8080]

alors vous suggereé que j'utilise ce strict ou pas ! car je vous comprends pas est ce qeu vous me le recommander ou vous me l'interdit

[iblis]

Utilise

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
use strict;
use warnings;