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