xclose $dad_rdr;
    xopen \*STDOUT, ">&=" . fileno $kid_wtr;