Se connecter avec
S'enregistrer | Connectez-vous

[Résolu] [Problème] [Perl,Tableaux] lire un fichier texte

Dernière réponse : dans Programmation

Bonjour à tous,

voici mon fichier .txt
Citation :

titi;ti;français;2
tata;ta;math;5
tutu;tu;anglais;4
tete;te;eps;8


Voici mon code j'ai essayer de mettre mon fichier texte dans un tableau et de le consulter en allant que je l'alllumente car mon tableau s'efface au fur à mesure
  1. #!/usr/bin/perl
  2. use strict;
  3.  
  4. my $ligne = undef;
  5. my @tab = undef;
  6. my $i = "tata"
  7. my $j = "ta";
  8. my $tmp = undef;
  9.  
  10. open my($file), '<', 'ENT_PROF.txt' 
  11.   or die "Impossible Ouverture Fichier\n";
  12.  
  13.  
  14. while(<$file>) 
  15. {
  16. #   push @tab, [split(/;/, $_)];
  17.    @tab=split(/;/, $_);
  18.  
  19.  
  20.  
  21. print ("$tab[0] , $tab[1] , $tab[2] , $tab[3]\n");
  22.  
  23.  
  24. if (($tab[0]=$i) && ($tab[1]=$j))
  25. {
  26. $tmp = ("@tab[0], @tab[1], @tab[2], @tab[3]\n");
  27. }
  28. }
  29.  
  30. print ("$tmp");


D'avance merci à vous.

Autres pages sur : resolu probleme perl tableaux lire fichier texte

Lassé par la pub ? Créez un compte
Lassé par la pub ? Créez un compte

Répondre Créer un nouveau sujet

Tom's guide dans le monde