diff --git a/bin/mkntpasswd b/bin/mkntpasswd
index e14b057b21a46777833a19d8f02ac905b099562b..1749958298cb52c14c5c888e6cd8d9b9484606ec 100755 (executable)
--- a/bin/mkntpasswd
+++ b/bin/mkntpasswd
#!/bin/sh
-perl -MCrypt::SmbHash -e "ntlmgen \"\$ARGV[0]\", \$lm, \$nt; print \"\${lm}:\${nt}\n\";" $1
+if [ $# -ne 1 ]; then
+ echo "Usage: mkntpwd <password>"
+ exit 1
+fi
+
+# Render hash using perl
+perl -MCrypt::SmbHash -e "print join(q[:], ntlmgen $ARGV[0]), $/;"
+
exit 0