SQL::Dialects::Role - The role of being a SQL::Dialect
package My::SQL::Dialect;
use SQL::Dialects::Role;
sub get_config {
return <<CONFIG;
[SECTION]
item1
item2
[ANOTHER SECTION]
item1
item2
CONFIG
}
This adds the role of being a SQL::Dialect to your class.
You must implement...
my $config = $class->get_config;
Returns information about the dialect in an INI-like format.
The role implements...
my $config = $class->get_config_as_hash;
Returns the data represented in get_config() as a hash ref.
Items will be upper-cased, sections will be lower-cased.
The example in the SYNOPSIS would come back as...
{
section => {
ITEM1 => 1,
ITEM2 => 2,
},
another_section => {
ITEM1 => 1,
ITEM2 => 2,
}
}
This module is
copyright (c), 2009 by Michael G. Schwern
copyright (c), 2009-2020 by Jens Rehsack.
All rights reserved.
The module may be freely distributed under the same terms as
Perl itself using either the ``GPL License'' or the ``Artistic
License'' as specified in the Perl README file.
Jeff can be reached at: jzuckerATcpan.org
Jens can be reached at: rehsackATcpan.org or via dbi-devATperl.org
dialect() in the SQL::Parser manpage
|