oogly. فكرة التحقق من صحة البيانات قد تكون مثالية!
التحميل الان

oogly. الترتيب والملخص

oogly. العلامات

الوحدة النمطية بيرل البيانات تأكيد صحة البيانات تصديق مركزية البيانات المركزية

oogly. وصف

فكرة التحقق من صحة البيانات قد تكون مثالية! الوحدة النمطية OOGLY هي نهج مختلف للتحقق من صحة البيانات، فإنه يحاول تبسيط وقواعد التحقق من صحة البيانات وتنفذها لضمان جاف (لا تكرر نفسك). يرجى ملاحظة! إنها ليست نية هذه الوحدة لتوفير إجراءات التحقق من الصحة ولكن بدلا من ذلك لتوفير التحكم في التدفق للتحكم في التدفق البسيط وتعزيز إعادة استخدام التعليمات البرمجية. فيما يلي مثال على ذلك ... استخدم التحقق من صحة MyApp ::؛ بلدي $ التطبيق = MyApp :: التحقق من الصحة -> جديد (Params \)؛ إذا كان ($ app-> التحقق من صحة ("تسجيل الدخول"، "كلمة المرور")) {...} آخر {print انضم "\ n"، @ {$ app-> أخطاء}؛ } حزمة MyApp :: التحقق من صحة استخدام OOGLY QW / Mixin Field /؛ # تحدد Mixin، وهو قالب Sortof الذي يمكن تضمينه مع القواعد الأخرى # باستخدام Mixin Directive Mixin "الافتراضي" => {مطلوب => 1، Min_Length => 4، Max_Length => 255}؛ # تحديد قاعدة التحقق من صحة البيانات للمعلمة "تسجيل الدخول" باستخدام Default # Mixin حيث يجب أن يكون طول "تسجيل الدخول" بين 4-255 حرفا ولديه حرف واحد على الأقل وحقل رقم واحد "تسجيل الدخول" => {Label => 'المستخدم تسجيل الدخول "، mixin =>" الافتراضي "، والتحقق من الصحة => SUB {بلدي ($ الذاتي، $ هذا، $ params) = @؛ بلدي (اسم $، $ القيمة) = ($ this -> {label}، $ params -> {تسجيل الدخول})؛ خطأ ($ هذا، "$ اسم" يجب أن يحتوي على حرف واحد ورقم واحد على الأقل ") ما لم يكن ($ قيمة = ~ / / | قيمة $ = ~ / / ) }}؛ # حدد قاعدة التحقق من صحة البيانات لمعلمة "كلمة المرور" باستخدام الحقل "المحدد مسبقا" `تسجيل الدخول" تسجيل الدخول "كحقل" كلمة المرور "= كلمة المرور" => {mixin_field => 'تسجيل الدخول'، التسمية => 'كلمة مرور المستخدم'}؛ و الآن لعملي الثاني والأخير، باستخدام OOGLY خارج الحزمة. #! / USR / BIN / PERL استخدام OOGLY QW /: الكل /؛ بلدي $ i = oogly (mixins => {default => {مطلوب => 1، min_length => 4، max_length => 255}}، الحقول => {تسجيل الدخول => {label => 'تسجيل دخول المستخدم'، mixin => "الافتراضي"، والتحقق من الصحة => SUB {بلدي ($ الذاتي، $ هذا، $ params) =_؛ بلدي (اسم $، قيمة $) = ($ this} -> {name}، $ params -> {تسجيل الدخول}) ؛ $ الذاتي> الخطأ ($ هذا، يجب أن يحتوي اسم الحقل $ على حرف واحد ورقم واحد على الأقل ") إذا كانت ($ قيمة! ~ / / $ قيمة! ~ / )؛}}، كلمة المرور => {mixin_field => 'تسجيل الدخول'، تسمية => 'كلمة مرور المستخدم'}،)؛ # مهم، تخزين المثال الجديد الذي تم إنشاؤه بواسطة دالة $ I-> وظيفة الإعداد $ o = $ i-> setup ({تسجيل الدخول => "الجذر"، كلمة المرور => '...'})؛ إذا ($ O-> التحقق من صحة) {...} المتطلبات: perl.

oogly. برامج ذات صلة