Легенда:
новое сообщение
закрытая нитка
новое сообщение
в закрытой нитке
старое сообщение
|
- Напоминаю, что масса вопросов по функционированию форума снимается после прочтения его описания.
- Новичкам также крайне полезно ознакомиться с данным документом.
[Perl] md5 16.05.01 00:41 Число просмотров: 608
Автор: Sergei Статус: Незарегистрированный пользователь
|
Я написал прогу которая криптует заданный пароль в md5:
#!/usr/bin/perl
use Digest::MD5 qw(md5_base64);
$passwd = "passwd";
$hash = md5_base64($passwd);
print "$hash\n";
На выходе получается:
dqIXO+Y5MlTnL/pNbfEDCg
Но криптованный пароль из /etc/shadow выглядит так:
$1$q/tlV7lJ$oxoHaOkR2dWCzL4osNn.31
То есть если отбросить все между символами '$' и сами символы, то все нормально. Так вот как генерить часть пароля между символами '$' программно?
Или это легче сделать на Си?
|
- [Perl] md5 - Sergei 16.05.01 00:41 [608]
|
|
|