Bonjour j'ai un fichier open.txt qui contient une valeur par exemple 1.
Je voudrais assigner une variable a la valeur contenu dans le fichier open.txt en l'occurence 1.
Voici mon code :
mais cela ne fonctionne pas ...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 $file = 'C:/perl/Open.txt'; open(INFO,$file); while(<$file>) { if (/ /) { my ($value) = ($1); } } print ("VALUE = $value\n" );
Quelqu'un aurait il la réponse merci !
Partager