SortCustom::set_order('+','-');
@set = sort { csort($a,$b) } @set;