السمة :: الطريقة ::
التحميل الان

السمة :: الطريقة :: الترتيب والملخص

السمة :: الطريقة :: العلامات

الوحدة النمطية بيرل بيرل يصف معالج السمة جدال التحقق قابل للكتابة

السمة :: الطريقة :: وصف

السمة :: الطريقة :: CAMEALE هي وحدة نمطية بيرل تنفذ سلسلة من أساليب معالج سمة. السمة :: الطريقة :: CABEALE هي وحدة نمطية PERL تنفذ سلسلة من طرق معالج سمة للاستخدام مع وظيفة وسيطة طريقة التحقق من وسيطة. استخدم Mixin QW {Attribute :: طريقة :: CEMPEALE}؛ # Orse استخدم Base QW {Attribute :: الطريقة :: CEMPEALE}؛ Sub MyMethod: الجمهور (int int) {بلدي $ $ = التحول؛ بلدي ($ A، $ B) =_؛ عودة $ a + $ b؛ } Sub Nothermethod: عامة (Votherclass SomeClass) {My $ Self = Shift؛ بلدي ($ OBJ1، $ OBJ2) =_؛ # الاشياء methody هنا. } Sub Privatemethod: Private (Scalar، Scalar، Scalar) {My $ Self = Shift؛ بلدي الأقل حرفية = التحول؛ بلدي $ litorref = التحول؛ بلدي $ scalarref = التحول؛ # methody الاشياء. } protectedmethod: المحمية (أخرى) {بلدي $ = self = shift؛ بلدي أي شيء = التحول؛ # methody الاشياء. } وظيفة فرعية: وظيفة (صفيف، رمز، التجزئة) {# وظيفي الاشياء هنا. بلدي ($ ArrayRef، $ coderef، $ hashref) =_؛ } وظيفة فرعية: وظيفة (Float Array Orday O List) {My ($ Arg1، $ Arg2، ELSE) =_؛ ARG2 $ -> = $ Arg1؛ إذا (Scalar (@ (Thelse)) {} # أشياء وظيفية أخرى. } ### في الرمز الخاص بك: # حسنا: كائن $-> Mymethod (1، 2)؛ # يلقي استثناء :: ParamError استثناء: كائن $-> MyMethod (1، "Apple")؛ # يلقي أيضا استثناء :: ParamError استثناء: كائن $-> MyMethod (7)؛ # يلقي استثناء :: استثناء منهجي: mymethod ('myclass'، 3، 4)؛ # كما يلقي استثناء استثناء :: استثناء MittyError # إلا إذا كان في MyClass: $ Object-> Privatemethod (Nearclass-> جديد، Someclass-> جديد)؛ # يلقي أيضا استثناء استثناء :: استثناء MethodError # إلا إذا كان في MyClass أو فئة فرعية من MyClass: $ Object-> ProtectestMetmethod ($ thingy)؛ المتطلبات: perl السمة:: معالجات البيانات :: أنواع اختبار :: Simpleunit Scalar :: Util هوك :: Wrapapsub استثناء :: الفصل

السمة :: الطريقة :: برامج ذات صلة