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