Mega Code Archive

 

Categories / Perl / File

 

Using tell function to check a file handle

open (FILEHANDLE, "<file.txt") or die "Cannot open file.txt"; seek FILEHANDLE, 12, 0; print tell FILEHANDLE; close (FILEHANDLE);