Yitzchak wrote: > > YMMV, but I find something like this more clear: > > @args = sort { ($a < 0) <=> ($b < 0) || $a <=> $b } @args; > > (literally, sort first by positive/negative, then by value). >
Very nice - thanks! Actually, I'm planning to rewrite this part of the program, because it can't handle overflow cases like this one: monthly ( days => [ 30, -20 ] ) - Flavio S. Glock