Bon alors vu la qualité de ta question, ne t'attends pas à une réponse géniale.
Si tu dois juste stocker dans un tableau le contenu d'un fichier (le tableau contient une cellule par ligne du fichier) le plus simple :
$file="/etc/passwd";
# Ouverture du fichier
open(FD, $file) or die "$file : $!";
# Copie du contenu du fichier dans un tableau
@lines=<FD>;
# Fermeture du fichier
close(FD);
Ensuite pour parcourir le tableau :
# Afficher la taille du tableau
print scalar(@lines)."\n";
#parcours linéaire des lignes du tableau
foreach $line (@lines) {
# Enlever le retour chariot de fin de ligne
chomp($line=$line);
# On coupe la ligne en utilisant comme séparateur ':'
# équivalent à : @result=split(":", $line);print @result[0]."\n";
($user, $passwd, $uid, $gid, $desc, $home, $shell) = split(":", $line);
print $user."\n";
}
Je te conseille tout de même d'acheter un bouquin sur Perl (par exemple de chez O'Reilly http://www.oreilly.fr/perl.html(...) ) pour commencer et/ou de trouver un tutoriel sur Internet. Si tu bloques déjà sur des choses comme ça tu n'as pas fini de ne pas avancer d'un pouce :).
# Heu
Posté par pifou . En réponse au message mettre les données d'un fichier dans un tableau. Évalué à 3.
# Afficher la taille du tableau print scalar(@lines)."\n"; #parcours linéaire des lignes du tableau foreach $line (@lines) { # Enlever le retour chariot de fin de ligne chomp($line=$line); # On coupe la ligne en utilisant comme séparateur ':' # équivalent à : @result=split(":", $line);print @result[0]."\n"; ($user, $passwd, $uid, $gid, $desc, $home, $shell) = split(":", $line); print $user."\n"; }Je te conseille tout de même d'acheter un bouquin sur Perl (par exemple de chez O'Reilly http://www.oreilly.fr/perl.html(...) ) pour commencer et/ou de trouver un tutoriel sur Internet. Si tu bloques déjà sur des choses comme ça tu n'as pas fini de ne pas avancer d'un pouce :).