File: 01_password.t

package info (click to toggle)
libcrypt-mysql-perl 0.04-6
  • links: PTS, VCS
  • area: main
  • in suites: bullseye, buster, stretch
  • size: 120 kB
  • ctags: 4
  • sloc: perl: 20; makefile: 2
file content (7 lines) | stat: -rw-r--r-- 205 bytes parent folder | download | duplicates (6)
1
2
3
4
5
6
7
use strict;
use Test::More tests => 2;

use Crypt::MySQL ();

is(Crypt::MySQL::password("foobar"), "4655c05b05f11fab");
is(Crypt::MySQL::password41("foobar"), "*9B500343BC52E2911172EB52AE5CF4847604C6E5");