Problème de remplissage tableau de Hachage
Résolu
bheadman
Messages postés
105
Date d'inscription
Statut
Membre
Dernière intervention
-
bheadman Messages postés 105 Date d'inscription Statut Membre Dernière intervention -
bheadman Messages postés 105 Date d'inscription Statut Membre Dernière intervention -
A voir également:
- Problème de remplissage tableau de Hachage
- Tableau word - Guide
- Tableau ascii - Guide
- Trier un tableau excel - Guide
- Tableau croisé dynamique - Guide
- Imprimer tableau excel sur une page - Guide
2 réponses
J'ai modifier un peu ma boucle et je constate que mon tableau de hachage se remplis bien comme souhaité ce pendant j'ai une erreur à chaque tours de boucle. Enfin par erreur je dirais plutôt une alerte dû à l'utilisation de l'option -w dans le shibang.
Voici le nouveau code :
et le résultat :
[root@srv41001 root]# ./test2.pl
syntax error at ./test2.pl line 21, near ")
print"
Execution of ./test2.pl aborted due to compilation errors.
[root@srv41001 root]# ./test2.pl
root:x:0:0:root:/root:/bin/bash
Use of uninitialized value in join or string at ./test2.pl line 23.
x:0:0:root:/root:/bin/bash:
bin:x:1:1:bin:/bin:/sbin/nologin
Use of uninitialized value in join or string at ./test2.pl line 23.
x:1:1:bin:/bin:/sbin/nologin:
daemon:x:2:2:daemon:/sbin:/sbin/nologin
Use of uninitialized value in join or string at ./test2.pl line 23.
x:2:2:daemon:/sbin:/sbin/nologin:
adm:x:3:4:adm:/var/adm:/sbin/nologin
Use of uninitialized value in join or string at ./test2.pl line 23.
x:3:4:adm:/var/adm:/sbin/nologin:
lp:x:4:7:lp:/var/spool/lpd:/sbin/nologin
Use of uninitialized value in join or string at ./test2.pl line 23.
x:4:7:lp:/var/spool/lpd:/sbin/nologin:
...
...
...
Voici le nouveau code :
my %hash = (); foreach (@listepwd){ my @tab = (); print "$_\n"; push(@tab,split(/:/,$_)); $hash{$tab[0]} = join(":",(@tab[1...7])); print "$hash{$tab[0]}\n"; }
et le résultat :
[root@srv41001 root]# ./test2.pl
syntax error at ./test2.pl line 21, near ")
print"
Execution of ./test2.pl aborted due to compilation errors.
[root@srv41001 root]# ./test2.pl
root:x:0:0:root:/root:/bin/bash
Use of uninitialized value in join or string at ./test2.pl line 23.
x:0:0:root:/root:/bin/bash:
bin:x:1:1:bin:/bin:/sbin/nologin
Use of uninitialized value in join or string at ./test2.pl line 23.
x:1:1:bin:/bin:/sbin/nologin:
daemon:x:2:2:daemon:/sbin:/sbin/nologin
Use of uninitialized value in join or string at ./test2.pl line 23.
x:2:2:daemon:/sbin:/sbin/nologin:
adm:x:3:4:adm:/var/adm:/sbin/nologin
Use of uninitialized value in join or string at ./test2.pl line 23.
x:3:4:adm:/var/adm:/sbin/nologin:
lp:x:4:7:lp:/var/spool/lpd:/sbin/nologin
Use of uninitialized value in join or string at ./test2.pl line 23.
x:4:7:lp:/var/spool/lpd:/sbin/nologin:
...
...
...
Bonjour,
j'ai l'impression que cela n'interesse personne donc je met en résolut ce poste (de toute façon j'ai réellement trouvé la solution)
voici le code que j'ai pondu et le résultat :
[root@srv41001 root]# ./test2.pl
root
root:x:0:0:root:/root:/bin/bash
bin
bin:x:1:1:bin:/bin:/sbin/nologin
daemon
daemon:x:2:2:daemon:/sbin:/sbin/nologin
adm
adm:x:3:4:adm:/var/adm:/sbin/nologin
lp
lp:x:4:7:lp:/var/spool/lpd:/sbin/nologin
sync
sync:x:5:0:sync:/sbin:/bin/sync
shutdown
shutdown:x:6:0:shutdown:/sbin:/sbin/shutdown
...
...
j'ai l'impression que cela n'interesse personne donc je met en résolut ce poste (de toute façon j'ai réellement trouvé la solution)
voici le code que j'ai pondu et le résultat :
#!/usr/bin/perl -w # Open the dump file open(PASSWD,"/etc/passwd") || die "Can't open /etc/passwd...$!\n"; my @listepwd = (); # Parse out the lines while ( <PASSWD> ) { chomp; if ( $_ =~ /bin/) { push (@listepwd,$_); } } close(PASSWD); my %hash = (); foreach $U (@listepwd){ my @tab = (); push(@tab,split(/:/,$U)); $hash{$tab[0]} = join(":",(@tab[0...6])); print "$tab[0]\n"; print "$hash{$tab[0]}\n"; }
[root@srv41001 root]# ./test2.pl
root
root:x:0:0:root:/root:/bin/bash
bin
bin:x:1:1:bin:/bin:/sbin/nologin
daemon
daemon:x:2:2:daemon:/sbin:/sbin/nologin
adm
adm:x:3:4:adm:/var/adm:/sbin/nologin
lp
lp:x:4:7:lp:/var/spool/lpd:/sbin/nologin
sync
sync:x:5:0:sync:/sbin:/bin/sync
shutdown
shutdown:x:6:0:shutdown:/sbin:/sbin/shutdown
...
...