Discussion :

[barokhe]

Bonjour,
J'ai un souci en perl qui je pense qu'il est bête :p mais je suis encore un debutant en programation perl,
je voudrais lire et afficher des argument apartir d'un fichier text. mais j'ai sur chauqe ligne 2 arguments qui sont séparé par une tabulation

voila mon fichier perl il affiche seulement le contenu de chaque ligne moi j'aimerai afiché le peremier argument et le 2 éme qui est séparer par une tabulation

Code :

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

1
2
3
4
5
6
7
 
my $filename= "in.txt";
  open (my $fh, '<' , $filename) or die "Impossible d'ouvrir le fichier '$filename' en lecture";
while(my $nom = <$fh>){
 
   print $nom;
  }

et voila mon fichier in.txt

Code :

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

1
2
3
4
 
argument 1         argument2
test1         test2
.....1         .........2

[Lolo78]

Bonjour,

dsl, je n'ai pas bien compris ce que tu veux obtenir. Pourrais-tu donner un exemple du résultat désiré?

Tu veux peut-être découper les lignes en entrée et afficher les morceaux sur des lignes différentes? ou autre chose?

[barokhe]

merci pour votre retour
pour mon code la variable $nom affiche toute la ligne moi j'aimerai faire 2 variabla $no et $prenom par exemple dont $nom affiche argument 1 et $prenom affiche argument2

[Lolo78]

Essaie de modifier comme suit la boucle de lecture du fichier:

Code :

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

1
2
3
4
5
6
 
while (my $lignes = <$fh>){
    chomp $ligne;
    my ($nom, $prenom) = split /\s+/, $ligne;
    print "Nom = $nom, Prénom = $prenom \n";
}