## Tcl8.6.17/Tk8.6.17 Documentation > Tcl Commands > eof

### Tcl/Tk Applications | Tcl Commands | Tk Commands | [incr Tcl] Package Commands | SQLite3 Package Commands | TDBC Package Commands | tdbc::mysql Package Commands | tdbc::odbc Package Commands | tdbc::postgres Package Commands | tdbc::sqlite3 Package Commands | Thread Package Commands | Tcl C API | Tk C API | [incr Tcl] Package C API | TDBC Package C API

### NAME

eof — 通信路上のファイル終末状態を確認する Check for end of file condition on channel

### 構文 SYNOPSIS

eof channelId

### 説明 DESCRIPTION

もし､通信路識別子 channelId の最後の入力操作(gets の様な)にファイル終末条件が発生していれば､1 を､そうでなければ 0 を返す｡ Returns 1 if an end of file condition occurred during the most recent input operation on channelId (such as gets), 0 otherwise.

channelId は､Tcl 標準通信路(stdin か stdout か stderr)､又は､ open や socket の起動からの返り値､又は､Tcl 拡張によってもたらされた通信路生成の命令の返り値の様な､開かれた通信路の識別子でなければならない｡ ChannelId must be an identifier for an open channel such as a Tcl standard channel (stdin, stdout, or stderr), the return value from an invocation of open or socket, or the result of a channel creation command provided by a Tcl extension.

### 用例 EXAMPLES

ファイル内容を１行づつ読んで印刷する: 　　 Read and print out the contents of a file line-by-line:

    set f [open somefile.txt]
    while {1} {
        set line [gets $f]
        if {[eof $f]} {
            close $f
            break
        }
        puts "Read line: $line"
    }

ファイル内容を決められた大きさの記録だけ読んで印刷する: 　　 Read and print out the contents of a file by fixed-size records:

    set f [open somefile.dat]
    fconfigure $f -translation binary
    set recordSize 40
    while {1} {
        set record [read $f $recordSize]
        if {[eof $f]} {
            close $f
            break
        }
        puts "Read record: $record"
    }

### SEE ALSO

file, open, close, fblocked, Tcl_StandardChannels

### KEYWORDS

channel, end of file
Copyright © 1993 The Regents of the University of California.
Copyright © 1994-1996 Sun Microsystems, Inc.