
SQL::QueryBuilder::Pretty::Rule - Base module for SQL::QueryBuilder::Pretty's rules.

Version 0.01

package SQL::QueryBuilder::Pretty::Database::ANSI::LogicOperator;
use base qw(SQL::QueryBuilder::Pretty::Rule);
sub order { return 70 }
sub match {
return qr/
AND|OR
/x;
}
sub action {
my $self = shift;
my $print = shift;
my $token = shift;
$print->new_line;
$print->var( $print->current_indent );
$print->var($token);
return 1;
}
1;

Base object for SQL::QueryBuilder::Pretty's rules.
Initializes the object.
THe action to be executed on match. Must return 1 to skip the next rules.
$print_object is a SQL::QueryBuilder::Pretty::Print object.
$token is the result of the match.
Returns the match regular expression for this rule.
Returns the name of the rule. By default the pm file. Not used yet.
Returns the order value for this rule. Default is 999.
Returns the type of this rule. Not used yet.

SQL::QueryBuilder::Pretty and SQL::QueryBuilder::Pretty::Print.

André Rivotti Casimiro, <rivotti at cpan.org>

Copyright (C) 2009 by André Rivotti Casimiro. Published under the terms of the Artistic License 2.0.