result of xUnique with modified sort perl script