Perl tell Function

Descrizione

Questa funzione restituisce la posizione corrente del puntatore di lettura (in byte) all'interno del FILEHANDLE specificato. Se FILEHANDLE viene omesso, restituisce la posizione all'interno dell'ultimo file a cui si accede.

Sintassi

Di seguito è riportata la semplice sintassi per questa funzione:

tell FILEHANDLE

tell

Valore di ritorno

Questa funzione restituisce la posizione del file corrente in byte.

Esempio

Di seguito è riportato il codice di esempio che mostra il suo utilizzo di base, per controllare questa funzione eseguire le seguenti operazioni:

  • Crea un file di testo con "this is test" come contenuto e memorizzalo nella directory / tmp.

  • Legge 2 caratteri da questo file.

  • Ora controlla la posizione del puntatore di lettura nel file.

#!/usr/bin/perl -w

open( FILE, "</tmp/test.txt" ) || die "Enable to open test file";
$char = getc( FILE );
print "First Character is $char\n";
$char = getc( FILE );
print "Second Character is $char\n";
# Now check the position of read pointer.
$position = tell( FILE );
print "Position with in file $position\n";
close(FILE);

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

First Character is E
Second Character is O
Position with in file 2