Austin Hastings wrote:

All of these have the same solution:

@list = ...
for [undef, @list[0...]] ¥ @list ¥ [EMAIL PROTECTED], undef] -> $last, $curr,
$next {
  ...
}

Which is all but illegible.

Oh, no! You mean I might have to write a...subroutine!??

    sub contextual (@list) {
        return [undef, @list[0...]] ¥ @list ¥ [EMAIL PROTECTED], undef]
    }

    for contextual( create_list_here() ) -> $last, $curr, $next {
        ...
    }

The horror!!!

;-)

Damian

Reply via email to