12345 => 123456 | not equivalent 1234567 => 12345678 | not equivalent 12345678 => 12345678901 | equivalent # the actual perl function crypt($plaintext, $salt); # is more or less equivalent to this crypt( substr($plaintext, 0, 8), substr($salt, 0, 2) );