while( my @list= @items[ $iter->() ] ) { warn "$target = sum( @list )\n"; }