Re: [quickie] Rounding up to next multiple

Paul Makepeace wrote:
> 
> This isn't really perl, but it might be mildly fun for a few seconds:
> 
>   $len += $page_size - $len % $page_size if $len % $page_size;
> 
> Any way of doing this in a single arithmetic expression, without the if?

$len += -$len % $page_size;

Mods of negative values are so much fun :)

-- 
Rick Klement