open(IN,"$file") or die $!;