open(IO,"< $file") or die "$!";