File Perl

#Format:
#close (FILEHANDLE);
#close FILEHANDLE;
open(INFILE, "datebook");
close(INFILE);