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


Reply via email to