open(FILE,"<$random_file") || die "Could not open file",$!;