diff options
| author | Angelo Naselli <anaselli@linux.it> | 2014-04-24 22:17:44 +0200 |
|---|---|---|
| committer | Angelo Naselli <anaselli@linux.it> | 2014-04-24 22:17:44 +0200 |
| commit | a3cc10719525f6a88b802ea3fc65a94a5d998350 (patch) | |
| tree | 196c923566fff36c5c4443ef5c05b421d242e5ba /lib/AdminPanel/Shared/Users.pm | |
| parent | c9a836d92e8463210a0ceb3e0254b463537732cd (diff) | |
| download | colin-keep-a3cc10719525f6a88b802ea3fc65a94a5d998350.tar colin-keep-a3cc10719525f6a88b802ea3fc65a94a5d998350.tar.gz colin-keep-a3cc10719525f6a88b802ea3fc65a94a5d998350.tar.bz2 colin-keep-a3cc10719525f6a88b802ea3fc65a94a5d998350.tar.xz colin-keep-a3cc10719525f6a88b802ea3fc65a94a5d998350.zip | |
Added password weakness checking
Improved icon and image installation and usage (File::ShareDir::Install)
Diffstat (limited to 'lib/AdminPanel/Shared/Users.pm')
| -rw-r--r-- | lib/AdminPanel/Shared/Users.pm | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/lib/AdminPanel/Shared/Users.pm b/lib/AdminPanel/Shared/Users.pm index 7745639..411f942 100644 --- a/lib/AdminPanel/Shared/Users.pm +++ b/lib/AdminPanel/Shared/Users.pm @@ -3,6 +3,8 @@ package AdminPanel::Shared::Users; use diagnostics; use strict; +use Data::Password::Meter; + #-###################################################################################### #- misc imports #-###################################################################################### @@ -21,6 +23,7 @@ our @EXPORT = qw( valid_groupname GetFaceIcon Add2UsersGroup + strongPassword ); sub facesdir() { @@ -123,4 +126,12 @@ sub Add2UsersGroup { } +sub strongPassword { + my $passwd = shift; + my $pwdm = Data::Password::Meter->new(); + + # Check a password + return $pwdm->strong($passwd); +} + 1; |