[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',
  ))
};

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',
9ee33178	12	))
	13	};
	14
	15	our @EXPORT_OK = keys our %CONST;
	16
	17	1;