open(IN, $file) || die $!