open(FILE,$file) || die "Could not open $file because: $!";
close(FILE) || die "Could not close $file because: $!";