open $TEXTIN,"<",$input2 || die "Can not open $input2: $!\n";