crypt 好聰明?

如果每次拿一樣的字串和 salt 給 crypt 去跑, 第二次以後就會很快跑完(難道有cache?).

也就是說, 以下的測試程式是沒有用的:
perl -e 'foreach (1..1000) { crypt("a", q($1$b)) }'

要測也至少要這樣測:
perl -e 'foreach (1..1000) { crypt("a$_", q($1$b)) }'