المصطلح :: ReadPassword. يسأل المستخدم عن كلمة مرور.
التحميل الان

المصطلح :: ReadPassword. الترتيب والملخص

المصطلح :: ReadPassword. العلامات

كلمه السر الوحدة النمطية بيرل بيرل قرأ اسأل كلمة المرور كلمة مرور المستخدم

المصطلح :: ReadPassword. وصف

مطالبة المستخدم بكلمة مرور. المصطلح :: ReadPassword هي وحدة نمطية للبيرل التي يمكن استخدامها لسؤال المستخدم لكلمة مرور لاستخدام كلمة مرور. بينما (1) {كلمة المرور الخاصة بي = read_password (كلمة المرور: ')؛ إعادة ما لم يحدد كلمة مرور $؛ إذا ($ كلمة مرور EQ "Flubber") {print "يتم منحها. "؛ الأخير؛} آخر {print" تم رفض الوصول. "؛ redo؛}} تتيح لك هذه الوحدة أن تسأل المستخدم عن كلمة مرور بالطريقة التقليدية، من لوحة المفاتيح، دون صدى، هذا غير مخصص للاستخدام عبر الويب؛ مصادقة المستخدم على الويب هو مسألة أخرى تماما. أيضا، يجب استخدام هذه الوحدة بشكل عام جنبا إلى جنب مع دالة Perl's Crypt ()، والتي تباع بشكل منفصل. يطالب وظيفة Read_PassWord في الإدخال، ويقرأ سطر من النص من لوحة المفاتيح، ثم إرجاع هذا السطر إلى المتصل. لا يشمل خط النص الحرف الجديد، لذلك ليس هناك حاجة لاستخدام Chomp.While يدخل المستخدم النص، وسيتم معالجة عدد قليل من الأحرف الخاصة. ستعيد حذف الحرف (أو BackSpaceSPACE) نسخة احتياطية من حرف واحد، وإزالة الحرف الأخير في المخزن المؤقت للإدخال (إن وجدت). سوف يشير الحرف CR (أو حرف LF) إلى نهاية الإدخال، مما يؤدي إلى إرجاع المخزن المؤقت للمدخلات المتراكمة. التحكم - سوف تفريغ المخزن المؤقت الإدخال. واختياريا، قد تكون التحكم في الحرف-ج تستخدم لإنهاء عملية الإدخال. (انظر التفاصيل أدناه.) سيتم إضافة جميع الأحرف الأخرى، حتى تلك التي من شأنها أن تتمتع عادة بأغراض خاصة، إلى المخزن المؤقت للإدخال. لا ينصح به، على الرغم من أنك تستخدم أحرف التحكم غير المحددة حتى الآن في كلمات المرور الخاصة بك، كما قد تصبح تلك الشخصيات ذات معنى في إصدار مستقبلي من هذه الوحدة. قد ترغب التطبيقات التي تسمح للمستخدم بضبط كلمات المرور الخاصة بها في فرض هذه القاعدة، وربما مع رمز شيء مثل هذا: {# كتلة عارية لتلقيح و redo بلدي new_pw = report_password ("أدخل كلمة المرور الجديدة:")؛ إذا ($ new_pw = ~ / () /) {my dad bad = unpack "h *"، $ 1؛ طباعة "كلمة المرور قد لا تحتوي على"؛ طباعة "شخصية مع رمز سداسي عشري $ سيئة. "؛ redo؛} elsif (طول ($ new_pw) <5) {print" يجب أن تكون كلمة المرور أطول من ذلك! "؛ redo؛} elsif ($ new_pw ne read_password (" أدخل عليه مرة أخرى: ")) {print" كلمات المرور لا تتطابق. "؛ redo؛} آخر {change_password ($ new_pw)؛ طباعة" تم تغيير كلمة المرور الخاصة بك الآن. "؛}}} المعلمة الثانية لقراءة القيمة هي قيمة idle_timeout الاختيارية. إذا كان رقم غير صفر وليس هناك إدخال لوحة مفاتيح لهذه الثواني عدة ثوان، فستنتهي عملية الإدخال. لاحظ أن هذا ليس مهلا زمنيا بشكل عام، نظرا لأن الموقت يتم إعادة تشغيله مع كل شخصية جديدة، فإن المعلمة الثالثة ستتيح اختياريا عملية الإدخال التي سيتم إنهاءها من قبل المستخدم مع Control-C. إذا لم يتم توفير هذا، أو غير صحيح، فسيتم إدخال عنصر تحكم مكتوب-ج في المخزن المؤقت للإدخال تماما مثل أي شخصية أخرى. في هذه الحالة، لا توجد وسيلة من لوحة المفاتيح لإنهاء البرنامج أثناء انتظار الإدخال. (أي القول، يتم تعليق القدرة العادية على إنشاء إشارات من لوحة المفاتيح أثناء المكالمة إلى Read_Password.) إذا انتهت عملية الإدخال مبكرا (إما لأن IDLE_TimeOute تم تجاوزه، أو لأنه تم تمكين وكتب عنصر تحكم مكتفا)، فستكون قيمة الإرجاع محمولة. في كلتا الحالتين، لا توجد طريقة لاستكشاف ما ( إذا كان أي شيء) كتبت BEF خام الإنهاء المبكر، أو لماذا تم إنهاء عملية الإدخال. لذلك لتثبيط المستخدمين من كتابة كلمات المرور الخاصة بهم في أي مكان إلا في المطالبة، سيتم التخلص من أي إدخال "تمت كتابته" قبل ظهور موجه. وما إذا كانت عملية الإدخال تنتهي بشكل طبيعي أم لا، سيتم طباعة حرف جديد، بحيث لا يبقى المؤشر على الخط بعد المطالبة. متطلبات: perl.

المصطلح :: ReadPassword. برامج ذات صلة