lib/Data/Query/Constants.pm

   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',
   9     DQ_OPERATOR => 'Operator',
  10     DQ_VALUE => 'Value',
  11     DQ_SELECT => 'Select',
  12     DQ_ALIAS => 'Alias',
  13     DQ_LITERAL => 'Literal',
  14     DQ_JOIN => 'Join',
  15     DQ_ORDER => 'Order',
  16     DQ_WHERE => 'Where',
  17     DQ_DELETE => 'Delete',
  18     DQ_UPDATE => 'Update',
  19   ))
  20 };
  21
  22 our @EXPORT_OK = keys our %CONST;
  23
  24 1;