c:\> perl -E "say crypt 'string', 'sa'"
saQ9i9dEI8LLA