perl -e 'print crypt("PassWord", "ht"), "\n"'