* Steven Lembark <[EMAIL PROTECTED]> [2002-11-20 12:47]:
> map
> {
> $sum < $cut ?
>
> ( ($sum += $sln + length) < $cut ? $_ : $end )
> :
> ()
> }
Wasted work. Two comparisons per element and you don't bail
once you've filled your available space.
On that note, this is a deficiency of map() vs for() that
I've often mourned - it's possible but I don't want to get
used to things like eval { map { .. die() } @LIST }; (goto
should work too, but that's even more atrocious). Maybe all
flow control being "funny looking exceptions" in Perl 6 will
allow us to retrofit it without crutches if it's not in
there by default.
--
Regards,
Aristotle
