open(FILE, '<', $file) or die "Can't open $file: $!\n";