open (FH, "directory/myfile") || die "Can Not open the file"; @array = ; close(FH);