my $crypted = crypt($string, '$1$salt$');