[Tuto] Les fichiers comme DB

[djkenny]

ba le level est dans le fichier lol

tclcopier

set a [open users.db]
    set users [split [read $a] "\n"]
    close $a
.....
    #foreach ligne par ligne du fichier donc 1ere ligne
# $u == #accueil alias_angelius motdepassdefou 200 alias_angelius*!*@*
    foreach u $users {
.....
        # lindex $u 3 est bien égale au level, 200 dans ce cas la         
        set level [lindex $u 3]
        set authed($nick,$salon) $level
.....