Authen-Passphrase
view release on metacpan or search on metacpan
t/acceptall.t view on Meta::CPAN
eval { Authen::Passphrase::AcceptAll->from_crypt("............."); };
isnt $@, "";
$ppr1 = Authen::Passphrase::AcceptAll->from_rfc2307("{CrYpT}");
is $ppr1, $ppr;
eval { Authen::Passphrase::AcceptAll->from_rfc2307("{CrYpT}............."); };
isnt $@, "";
foreach my $passphrase("", qw(0 1 foo supercalifragilisticexpialidocious)) {
ok $ppr->match($passphrase);
}
is $ppr->passphrase, "";
is $ppr->as_crypt, "";
is $ppr->as_rfc2307, "{CRYPT}";
1;
t/bigcrypt.t view on Meta::CPAN
1;
__DATA__
7S 4VBRyAvp9nw
Ur 6e9cwNFemc. 0
QZ e2iVWSOxMVk 1
Qe KQ9Te3r2O4o foo
JG w9PEfARmc7A supercal
yU 7SM20XfzOvsZludTWFafCE supercalfoo
vY JR2.m1Ow1WYVoCn.TiPmZw 01234567foo
Cy kVuwUqTCr52CwqaDc8rfnE supercalifragili
Uk U3cGYFW4ueM72AolWB5yawnxRA.6JGrikjBe.CyUFGDUbf0RYcrvYyU supercalifragilisticexpialidocious
t/blowfishcrypt.t view on Meta::CPAN
}
}
1;
__DATA__
0 6 Yn6x4nvPtEPkdmRQ74S1Q. ehVP/UL/xbYgKCilZtidy3nc5ttCeLa
0 6 EJv2xOCAoTkNo9y/BtUdLe OVbnD8L9oD7DVE7g0hJgCQO0YA7UHx2 0
0 8 b8i4onzFJ0egD/hxHXSl1O 1dSVPvRb6q5pY5kjW8sYnmfnMWAwPX2 1
1 9 jFan8v8EukXTQzWOHA3Hlu GrNPCCLl5347WLZCdCuNp2VKZOXEDYC foo
0 2 /5A.BZ8WXbFhIEZK5WP7Ku VOUYef56LKYc.4FNp0im8EX7X31EnOa supercalifragilisticexpialidocious
use Test::More tests => 49;
BEGIN { use_ok "Authen::Passphrase::Clear"; }
my $ppr = Authen::Passphrase::Clear->from_rfc2307("{CLEARTEXT}womble");
ok $ppr;
is $ppr->passphrase, "womble";
eval { Authen::Passphrase::Clear->from_rfc2307("{CRYPT}*"); };
isnt $@, "";
my @test_phrases = ("", qw(0 1 foo supercalifragilisticexpialidocious));
foreach my $rightphrase (@test_phrases) {
$ppr = Authen::Passphrase::Clear->new($rightphrase);
ok $ppr;
foreach my $passphrase (@test_phrases) {
ok ($ppr->match($passphrase) xor $passphrase ne $rightphrase);
}
is $ppr->passphrase, $rightphrase;
eval { $ppr->as_crypt };
isnt $@, "";
t/crypt16.t view on Meta::CPAN
}
}
1;
__DATA__
7S ...........4VBRyAvp9nw
Ur ImG9Kp15IQsO2OoWANp2qc 0
QZ 7Dztte564Tsv/MSAT.EjMA 1
Qe tZVtOlWcUdEgK.3Asz6yo. foo
Uk uSoh3oV2exsgb27c/7adao supercalifragilisticexpialidocious
t/eggdropblowfish.t view on Meta::CPAN
ok ($ppr->match($passphrase) xor $passphrase ne $rightphrase);
}
}
1;
__DATA__
v.gq8.qm3rM1 0
V6ZOx0rVGWT0 1
AINZW/4MSzQ1 foo
V7/Cv0ShonY0 supercalifragilisticexpialidocious
jdwmI1F5evD0 abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqr
UlrmE/pDCZE/ abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz
t/extdescrypt.t view on Meta::CPAN
}
}
1;
__DATA__
fiO. zjn3 EwD4x5Zn7lY
i9O/ VDnK bXjK3LN9iE2 0
3Ro. TEkq ACp9yg0cqDM 1
I4l. wIO. yaNPU/4ioNk foo
eGu. aKa2 YN9krx1eBSE supercalifragilisticexpialidocious
t/gendescrypt.t view on Meta::CPAN
}
}
1;
__DATA__
xIw. Alif bXjK3LN9iE2 6UN3gAqtTbM
Eoz. jn35 ACp9yg0cqDM puFoxi30V2o 0
6.d. UyXU yaNPU/4ioNk ZxMRQY8Bpdo 1
Ogc. qu8. YN9krx1eBSE Vcrdw3DtWc6 foo
bAy. XCaN EwD4x5Zn7lY 7KB8x6lwKIQ supercalifragilisticexpialidocious
}
}
1;
__DATA__
aad3b435b51404eeaad3b435b51404ee
25AD3B83FA6627C7AAD3B435B51404EE 0
C2265B23734E0DACAAD3B435B51404EE 1
5bfafbebfb6a0942aad3b435b51404ee foo
f0e963830c0156217887ed3fba9a7ed5 supercalifragi
t/md5crypt.t view on Meta::CPAN
}
}
1;
__DATA__
.ek8tjGw JlwHaPpGUeCpzvx6DSYt.0
ZoDb0wM1 TSZxQ/qndpG1yB9HqCMHg/ 0
Z7/4DX0p 6IBWggA5iXUKnYI7xhl6R1 1
RveEKWw9 //PkU.geQpEJRr7JoK7ey/ foo
Tdb1JRjV CTqZJJGDNwtm6ScQ2w6md/ supercalifragilisticexpialidocious
t/mysql323.t view on Meta::CPAN
}
}
1;
__DATA__
5030573512345671
606717756665BCE6 0
606717496665BCBA 1
7c786c222596437b foo
6873f3091d7dad18 supercalifragilisticexpialidocious
t/mysql41.t view on Meta::CPAN
}
}
1;
__DATA__
be1bdec0aa74b4dcb079943e70528096cca985f8
B12289EEF8752AD620294A64A37CD586223AB454 0
E6CC90B878B948C35E92B003C792C46C58C4AF40 1
f3a2a51a9b0f2be2468926b4132313728c250dbf foo
2bbbb6095dced8e931a3dd85dc2c2a039932ed6c supercalifragilisticexpialidocious
t/netscapemail.t view on Meta::CPAN
}
}
1;
__DATA__
hlV8:`2Q4?@^If)5(cf4xbDKV#o\Sk(` d019c4507be8652975e62871acaa7b52
te6]{4LF|aKFZ;Gcd0}Mul"Wmfg\;fn) 8178663855a984e46d55c57beecefdc2 0
PmkK.8*qCB5JDq}]d#B]8/2`sGENeHKK 8129e982919eec1a70c0a7b28e8425c3 1
m6x*g?v;,"\i[|7/rto~Su6rH?*t|L50 585C16EFA23F1FB1259318314DD78D57 foo
<#O[v2gbw46=L}frBIgJ1l:Hw3Z9Wz[, f168cf3e2e5558c2b1be5841d3601e10 supercalifragilisticexpialidocious
}
}
1;
__DATA__
31d6cfe0d16ae931b73c59d7e0c089c0
7bc26760a19fc23e0996daa99744ca80 0
69943C5E63B4D2C104DBBCC15138B72B 1
ac8e657f83df82beea5d43bdaf7800cc foo
f5295d5b0a47abecb70ed08bdb6d4e6e supercalifragilisticexpialidocious
}
}
1;
__DATA__
6 MVeiwNN2 Z9ajy4aaEmIhSGxgfIMbF/
3 tWgAqczl uHKlOhHYT1V80gVQxgypw. 0
7 Fi0425wg bQvE6tzjOfMPGgENlndLm/ 1
8 EP62lbrh mf/uFiTNicupnEEbqAbK70 foo
9 /.ksQxvw hZ7Sdy4MmLyS15OJjhbrG1 supercalifragilisticexpialidocious
t/rejectall.t view on Meta::CPAN
eval { Authen::Passphrase::RejectAll->from_crypt("............."); };
isnt $@, "";
$ppr1 = Authen::Passphrase::RejectAll->from_rfc2307("{CrYpT}*");
is $ppr1, $ppr;
eval { Authen::Passphrase::RejectAll->from_rfc2307("{CrYpT}............."); };
isnt $@, "";
foreach my $passphrase("", qw(0 1 foo supercalifragilisticexpialidocious)) {
ok !$ppr->match($passphrase);
}
eval { $ppr->passphrase };
isnt $@, "";
is $ppr->as_crypt, "*";
is $ppr->as_rfc2307, "{CRYPT}*";
1;
}
}
1;
__DATA__
616263 900150983cd24fb0d6963f7d28e17f72
717765 ce97e12b13baef6403b5456f8fc2ce99 0
212121 b097f957c235fd286364dc2084b2546d 1
787878 097412258a515fc61cfe73f421f58b8f foo
707966 c676f3ddf4b4ed188a89d73525ff678e supercalifragilisticexpialidocious
}
}
1;
__DATA__
616263 a9993e364706816aba3e25717850c26c9cd0d89d
717765 7cd928d1e6457c57c01f3c9442177fc62cafa56f 0
212121 2fee6a4e9b98f3bd6de8b1960cfb37f8b44d8bb1 1
787878 76cdd1408a02a44687fe87c98f8dc43678c4ef5f foo
707966 b264504de2719cebf898608cf950e1da5f3ae28f supercalifragilisticexpialidocious
t/traddescrypt.t view on Meta::CPAN
}
}
1;
__DATA__
Lg 3RoTEkqxIwA
f4 eGuaKa2lifE 0
Bu fiOozjn356. 1
e5 dUyXVDnKUOg foo
pl I4lcqu8wIO. supercalifragilisticexpialidocious
t/vmspurdy.t view on Meta::CPAN
ok ($ppr->match($passphrase) xor $passphrase ne $rightphrase);
}
}
1;
__DATA__
PURDY Chekov 63412 6ec0aed034aca888 0
PURDY_S Kirk 5623 4e9c1cf8b461c7ff 1
PURDY_V Spock 9084 7d63771C2BC9bb96 foo
PURDY_V Sulu 645 0bcedbfcec4dee1d supercalifragilisticexpialidocio
( run in 2.620 seconds using v1.01-cache-2.11-cpan-b16cb0d3907 )