while ( my @group = $next->() )

##</code><code>##

my $arrayref_of_aliases = sub { \@_ }->( $stuff, $to, $alias );

##</code><code>##

        return sub { \@_ }->( @$list[ $start .. $stop ] );