open(FILE,"<",$filename1) or die "\n...Cannot find the file: $filename";