Class :: Accessor.

Class :: Accessor היא כלי אוטומטי של אביזרים אוטומטיים.
הורד עכשיו

Class :: Accessor. דירוג וסיכום

פרסומת

  • Rating:
  • רישיון:
  • Perl Artistic License
  • מחיר:
  • FREE
  • שם המפרסם:
  • Marty Pauley
  • אתר האינטרנט של המוציא לאור:
  • http://search.cpan.org/~kasei/Class-Accessor-0.31/lib/Class/Accessor.pm

Class :: Accessor. תגים


Class :: Accessor. תיאור

Class :: Accessor הוא כלי אוטומטי אוטומטיים דור. Class :: Accessor הוא Automator Accessor Dearation Tool.Synopsis עובד החבילה; השתמש QW בסיס (Class :: Accessor); עובד-> mk_accessors (QW (שם תפקידים תפקידים)); # בינתיים, בפיסת קוד בקרבת מקום! # Class :: Accessor מספק חדש (). שלי $ mp = foo-> חדש ({name => "marty", תפקיד => "JAPH"}); שלי $ עבודה = $ mp-> תפקיד; # מקבל $ MP -> {תפקיד} $ mp-> שכר (400000); # sets $ mp -> {שכר} = 400000 (אני רוצה) # כמו שלי @info = @ {$ mp} {QW (שם תפקיד)} שלי @Info = $ mp-> קבל (QW (שם תפקיד)); # $ MP -> {שכר} = 400000 $ mp-> הגדר ('משכורת', 400000); מודול זה יוצר אוטומטית אביזרים / מוטטורים עבור הכיתה שלך .Most של הזמן, כתיבת אביזרים הוא תרגיל חיתוך והדבקה. אתה בדרך כלל בסופו של דבר עם סדרה של שיטות כאלה: שם משנה {שלי עצמי עצמי = משמרת; אם (@_) {$ עצמן -> {name} = $ _ ; } החזרת $ עצמית -> {name}; } משכורת משנה {שלי עצמי עצמי = משמרת; אם (@_) {$ עצמי -> {שכר} = $ _ ; } החזרת $ $ -> {שכר}; } # וכו '... אחד עבור כל פיסת נתונים באובייקט שלך. בעוד כמה יהיה ייחודי, ביצוע בדיקות ערך וטריקים אחסון מיוחד, רוב פשוט יהיה תרגילים בחזרה. לא רק שזה סגנון רע יש חבורה של קוד חוזר, אבל גם שלה פשוט לא עצלן, שהוא הטרגדיה האמיתית.אם אתה עושה את המודול שלך משנה של מחלקה :: Accessor ולהצהיר שדות Accessor שלך עם MK_ACCESSORS () אז אתה "ll למצוא את עצמך עם קבוצה של אביזרים שנוצר באופן אוטומטי אשר יכול אפילו להיות מותאם אישית! הגדר הבסיסי הוא פשוט מאוד: החבילה שלי :: בכיתה; השתמש QW בסיס (Class :: Accessor); שלי :: בכיתה-> mk_accessors (QW (מכונית בר Foo)); נעשה. שלי :: בכיתה עכשיו יש פו פשוט (), בר () ומכונית () אביזרים מוגדרים. דרישות: · פרל


Class :: Accessor. תוכנה קשורה

עלינו