NAME
List::Group - Group a list of data structures to your specifications.
SYNOPSIS
use List::Group qw[group];
my @list = qw[cat dog cow rat];
my @group = group @list, cols => 2;
foreach my $row ( @group ) {
print "@{$row}\n";
}
DESCRIPTION
A simple module that currently allows you to group a list by columns or rows.
Functions
"group" listref, args
my @table = group \@list, cols => 2;
This function returns a list-of-lists containing the elements of
listref passed as the first argument. The remaining arguments
detail how to group the elements. Available groupings are
"cols", and "rows". Each of these groupings accept a single
digit as a value, the number of "cols" or "rows" to create.
The following is what @table would look like from the previous
example.
my @list = qw[cat dog mouse rat];
my @table = group \@list, cols => 2;
print Dumper \@table;
__END__
$VAR1 = [
[ 'cat', 'dog' ],
[ 'mouse', 'rat' ]
];
AUTHOR
Casey West, <casey@geeknest.com>.
COPYRIGHT
Copyright (c) 2004 Casey West. All rights reserved.
This module is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.