[dbsrgits/Data-Query.git] / lib / Data / Query / Constants.pm

package Data::Query::Constants;

use strictures 1;
use Exporter 'import';

use constant +{
  (our %CONST = (
    DQ_IDENTIFIER => 'Identifier',
    DQ_OPERATOR => 'Operator',
    DQ_VALUE => 'Value',
    DQ_SELECT => 'Select',
    DQ_ALIAS => 'Alias',
    DQ_LITERAL => 'Literal',
    DQ_JOIN => 'Join',
  ))
};

our @EXPORT_OK = keys our %CONST;

1;
Commit	Line	Data
9ee33178	1	package Data::Query::Constants;
	2
	3	use strictures 1;
	4	use Exporter 'import';
	5
	6	use constant +{
	7	(our %CONST = (
	8	DQ_IDENTIFIER => 'Identifier',
b616bc41	9	DQ_OPERATOR => 'Operator',
b616bc41	10	DQ_VALUE => 'Value',
9c8fc055	11	DQ_SELECT => 'Select',
2cf0bb42	12	DQ_ALIAS => 'Alias',
	13	DQ_LITERAL => 'Literal',
	14	DQ_JOIN => 'Join',
9ee33178	15	))
	16	};
	17
	18	our @EXPORT_OK = keys our %CONST;
	19
	20	1;