Perl-read

Perl読み取り関数

説明

この関数は、FILEHANDLEに関連付けられたファイルからBUFFERにLENGTH個のバイト数を読み取る、または読み取ろうとします。 オフセットが指定されている場合、読み取られたバイトは指定されたオフセットから始まるバッファーに配置されます。

構文

以下は、この関数の簡単な構文です-

read FILEHANDLE, SCALAR, LENGTH, OFFSET

read FILEHANDLE, SCALAR, LENGTH

戻り値

この関数は、読み取られたバイト数または未定義の値です。

例

以下は、その基本的な使用法を示すコード例です-

#!/usr/bin/perl -w

my($buffer) = "";
open(FILE, "/etc/services") or
     die("Error reading file, stopped");
while(read(FILE, $buffer, 100) ) {
   print("$buffer\n");
}
close(FILE);

上記のコードが実行されると、次の結果が生成されます-

kerberos_master 751/udp  # Kerberos authentication
kerberos_master 751/tcp  # Kerberos authentication
passwd_server   752/udp  # Kerberos passwd server