Revision 7ba33689
Von Moritz Bunkus vor fast 14 Jahren hinzugefügt
| SL/Auth/PasswordPolicy.pm | ||
|---|---|---|
| 81 | 81 |
$cfg{invalid_characters_re} = '[' . quotemeta($cfg{invalid_characters}) . ']' if $cfg{invalid_characters};
|
| 82 | 82 |
$cfg{special_characters} = '!@#$%^&*()_+=[]{}<>\'"|\\,;.:?-';
|
| 83 | 83 |
$cfg{special_characters_re} = '[' . quotemeta($cfg{special_characters}) . ']';
|
| 84 |
print $cfg{special_characters_re}, "\n";
|
|
| 85 | 84 |
|
| 86 | 85 |
map { $cfg{"require_${_}"} = $cfg{"require_${_}"} =~ m/^(?:1|true|t|yes|y)$/i } qw(lowercase uppercase digit special_char);
|
| 87 | 86 |
|
Auch abrufbar als: Unified diff
Debugcode