X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FApache2%2FAuthen%2FPassphrase.pm;fp=lib%2FApache2%2FAuthen%2FPassphrase.pm;h=e8a157991eba0dfd3c30549583feae52326eee4b;hb=788a3738b30591768f1843f0b00d7a3cfd820358;hp=bea2bca35a2fb3e1728ac4cc4a4c2c5e1f9ffc49;hpb=7c87e9956212e10070c94f02caf0d9998e4cc433;p=apache2-authen-passphrase.git diff --git a/lib/Apache2/Authen/Passphrase.pm b/lib/Apache2/Authen/Passphrase.pm index bea2bca..e8a1579 100644 --- a/lib/Apache2/Authen/Passphrase.pm +++ b/lib/Apache2/Authen/Passphrase.pm @@ -6,6 +6,7 @@ use 5.014000; use strict; use warnings; use parent qw/Exporter/; +use subs qw/OK HTTP_UNAUTHORIZED/; use constant +{ USER_REGEX => qr/^\w{2,20}$/pa, @@ -14,9 +15,9 @@ use constant +{ BAD_PASSWORD => "bad-password\n", }; -use Apache2::RequestRec; -use Apache2::Access; -use Apache2::Const qw/OK HTTP_UNAUTHORIZED/; +use if $ENV{MOD_PERL}, 'Apache2::RequestRec'; +use if $ENV{MOD_PERL}, 'Apache2::Access'; +use if $ENV{MOD_PERL}, 'Apache2::Const' => qw/OK HTTP_UNAUTHORIZED/; use Authen::Passphrase; use Authen::Passphrase::BlowfishCrypt; use YAML::Any qw/LoadFile DumpFile/;