open(IN,$log) || die $!;