Mega Code Archive

 

Categories / Perl / File

 

Undef file handle

use IO::File; $filehandle = new IO::File; if ($filehandle->open("<hello.txt")) {     print <$filehandle>;     undef $filehandle; }