NAME¶
DBIx::DBSchema::ColGroup - Column group objects
SYNOPSIS¶
use DBIx::DBSchema::ColGroup;
$colgroup = new DBIx::DBSchema::ColGroup ( $lol_ref );
$colgroup = new DBIx::DBSchema::ColGroup ( \@lol );
$colgroup = new DBIx::DBSchema::ColGroup (
[
[ 'single_column' ],
[ 'multiple_columns', 'another_column', ],
]
);
$lol_ref = $colgroup->lol_ref;
@sql_lists = $colgroup->sql_list;
@singles = $colgroup->singles;
DESCRIPTION¶
This class is deprecated and included for backwards-compatibility only. See
DBIx::DBSchema::Index for the current class used to store unique and
non-unique indices.
DBIx::DBSchema::ColGroup objects represent sets of sets of columns. (IOW a
"list of lists" - see perllol.)
METHODS¶
- new [ LOL_REF ]
- Creates a new DBIx::DBSchema::ColGroup object. Pass a
reference to a list of lists of column names.
- lol_ref
- Returns a reference to a list of lists of column
names.
- sql_list
- Returns a flat list of comma-separated values, for SQL
statements.
For example:
@lol = (
[ 'single_column' ],
[ 'multiple_columns', 'another_column', ],
);
$colgroup = new DBIx::DBSchema::ColGroup ( \@lol );
print join("\n", $colgroup->sql_list), "\n";
Will print:
single_column
multiple_columns, another_column
- singles
- Returns a flat list of all single item lists.
AUTHOR¶
Ivan Kohler <ivan-dbix-dbschema@420.am>
COPYRIGHT¶
Copyright (c) 2000 Ivan Kohler Copyright (c) 2000 Mail Abuse Prevention System
LLC All rights reserved. This program is free software; you can redistribute
it and/or modify it under the same terms as Perl itself.
BUGS¶
SEE ALSO¶
DBIx::DBSchema::Index, DBIx::DBSchema::Table, DBIx::DBSchema::ColGroup::Unique,
DBIx::DBSchema::ColGroup::Index, DBIx::DBSchema, perllol, perldsc, DBI