Discussion :

[David_24]

Salut
Je veux lire les 20 dernières lignes d'un fichier texte avec mon bot. Est-ce que c'est possible ?
Merci

[Canvas]

Bonsoir,

Voici une possibilité classique, je ne sais pas si cela convient à l'environnement d'un bot (lecture/écriture d'un fichier sur le disque).

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
# Création d'un fichier de 31 lignes 
set fp [open test.txt w]
for {set i 1} {$i <= 30} {incr i} {
   puts $fp "ligne $i"
}
close $fp
 
# Ouverture d'un fichier
set fp [open test.txt r]
set data [read $fp]
close $fp
 
# Découpe du contenu de la variable data dans une liste 
# selon les retours chariot
set data [split $data \n]
 
# Longeur de la liste
set nblignes [llength $data]

Les 20 dernières lignes se trouvent dans la liste suivante:

Code :

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

1
2
 
set l20 [lrange $data [expr {$nblignes-19}] $nblignes]

Cordialement,

----
Canvas