Reference eof function from file handle to check if it is the end of file : IO « File « Perl






  1. Perl
  2. File
  3. IO

Reference eof function from file handle to check if it is the end of file

    

use IO::File;

$filehandle = new IO::File;
$filehandle->open("<file.txt") or die "Could not open file.txt";

$text = "";

until ($filehandle->eof) {
    $filehandle->read($newtext, 1);
    $text .= $newtext;
}

print $text;

$filehandle->close;








Related examples in the same category

1.Call tell function from file handle
2.Close a file handle
3.Count the lines of a file
4.Using format_write function to save formatted data to a file
5.Using IO::File to write string to a file
6.Using IO:File open to open a file for read
7.Using write function to write string to a file