/usr/share/perl5/Lemonldap/NG/Common/PSGI/Constants.pm is in liblemonldap-ng-common-perl 1.9.16-2.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 | package Lemonldap::NG::Common::PSGI::Constants;
use strict;
use Exporter 'import';
use base qw(Exporter);
our $VERSION = '1.9.1';
# CONSTANTS
use constant {
DEBUG => 4,
INFO => 3,
WARN => 2,
NOTICE => 1,
ERROR => 0,
};
our $no = qr/^(?:off|no|0)?$/i;
our %EXPORT_TAGS = ( 'all' => [qw(DEBUG INFO WARN ERROR $no)] );
our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );
our @EXPORT = ( @{ $EXPORT_TAGS{'all'} } );
1;
|