Games::Bingo::ColumnCollection - a collection class for holding columns
my $col = Games::Bingo::ColumnCollection-E<gt>new(); my $c = Games::Bingo::Column-E<gt>new(0, [1, 2, 3, 4, 5, 6, 7, 8, 9]); $col-E<gt>add_column($c1); my $d = $col-E<gt>get_column(1); my $e = $col-E<gt>get_random_column();
The ColumnCollection is used when building the bingo cards and is a temporary data structure for holding object of the class Column.
The class is an encapsulated array, which is 1 indexed.
The constructor blesses and array and returns.
The divided method has nothing as such to do with the class apart from it is a helper method, which is used to taking a list of numbers (1-90 expected, see Games::Bingo).
It then divided this list into 9 separate arrays of the following constallations:
1-9
10-19
20-29
30-39
40-49
50-59
60-69
70-79
80-90
From these arrays the Columns are built and the column collection is slowly populated, when done the column collection is returned.
This is a push like method, is can be used to add an additional to the collection.
The method can remove a column specified by its index, the argument specifies this index.
The method returns a column specified by its index, the argument to this method is the index.
The second argument is an indicator of whether the returned collection should be removed from the list, 1 for removed and 0 for not removing, the latter is the default.
This method returns a random columns, the optional parameter can be used to indicate whether the column should be removed from the list. 1 indicates a removed and nothing (the default) that nothing should be done.
The method uses the fact that the class contains Columns and a bit of polymorphy, so this method can be used to set the status of all Columns contained in the class. ' The parameter is the status which you want to set, either 1 or 0.
Returns the number of columns in G::B::Column object.
The TODO file contains a complete list for the whole Games::Bingo project.
My friend Allan helped me out with some of the algoritmic stuff and was in when this class was thought up.
Jonas B. Nielsen, (jonasbn) - <jonasbn@cpan.org>
<jonasbn@cpan.org>
Games-Bingo is (C) by Jonas B. Nielsen, (jonasbn) 2003-2015
Games-Bingo is released under the artistic license 2.0
To install Games::Bingo, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Games::Bingo
CPAN shell
perl -MCPAN -e shell install Games::Bingo
For more information on module installation, please visit the detailed CPAN module installation guide.