close OUTPUT                # wait for sort to finish
                    or warn $! ? "Error closing sort pipe: $!"
                               : "Exit status $? from sort";