package global_constants;
use strict;
use warnings;
my %constants;
BEGIN {
%constants = (
LOAD_ARABIC => 1,
LOG_USERS_ACTIONS => 1,
ENABLE_RCSE => 1,
);
}
use constant \%constants;
use base 'Exporter';
our @EXPORT = ();
our @EXPORT_OK = keys(%constants);
our %EXPORT_TAGS = (
all => \@EXPORT_OK,
default => \@EXPORT,
log => [ grep /^LOG_/, @EXPORT_OK ], # all constants beginning with "LOG_"
);
1;
####
use global_constants qw( :all );
####
use global_constants qw( :log ENABLE_RCSE );