Funzione di lettura di Perl

Descrizione

Questa funzione legge o tenta di leggere il numero LENGTH di byte dal file associato a FILEHANDLE in BUFFER. Se viene specificato un offset, i byte letti vengono inseriti nel buffer a partire dall'offset specificato.

Sintassi

Di seguito è riportata la semplice sintassi per questa funzione:

read FILEHANDLE, SCALAR, LENGTH, OFFSET

read FILEHANDLE, SCALAR, LENGTH

Valore di ritorno

Questa funzione il numero di byte letti o il valore indefinito.

Esempio

Di seguito è riportato il codice di esempio che mostra il suo utilizzo di base:

#!/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);

Quando viene eseguito il codice sopra, produce il seguente risultato:

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