סינון :: פשוט מסנן :: מודול פשוט מאפשר סינון מקור פשוט.
הורד עכשיו

סינון :: פשוט דירוג וסיכום

סינון :: פשוט תגים

פרל מודול perl סִנוּן מָקוֹר סינון מקור סינון פשוט

סינון :: פשוט תיאור

מסנן :: מודול פשוט מאפשר סינון מקור פשוט. מסנן :: מודול פשוט מאפשר סינון מקור פשוטה. השתמש בסנן :: פשוט; מסנן {...}; # או רק: # # השתמש מסנן :: תת פשוט {...}; # בקוד של משתמש: השתמש Myfilter; # קוד זה מסונן ללא Myfilter; # קוד זה הוא לא סינון intersource הוא תכונה חזקה מאוד של גירסאות האחרונות של Perl. זה מאפשר לאדם להאריך את השפה עצמה (למשל. מודול המתג), כדי לפשט את השפה (למשל שפה :: Pythonesque), או כדי לחדש לחלוטין את השפה (למשל Lingua :: Romana :: Perligata). באופן יעיל, זה מאפשר אחד להשתמש במלוא העוצמה של Perl כמו משלה, recurrively להחיל, מאקרו שפה.המסר מצוין :: util :: מודול התקשרות (על ידי פול Marquess) מספק ממשק Perl שמיש למקור סינון, אבל זה לעתים קרובות חזק מדי ולא כמעט פשוט כמו שזה יכול להיות.כדי להשתמש במודול יש צורך לעשות את הפעולות הבאות: הורדה, לבנות, ולהתקין את המסנן :: util :: שיחה מודול. (אם יש לך Perl 5.7.1 או מאוחר יותר, זה כבר נעשה בשבילך). הגדר מודול שעושה מסנן שימוש :: util :: התקשר. בתוך מודול זה, צור שגרות ייבוא. בתוך Subroutine ייבוא לעשות שיחה כדי לסנן_Add, להעביר אותו או התייחסות שגרתית. בתוך התייחסות SUBROUTINE, Call Filter_Read או Filter_read_exact ל "Prime" $ _ עם נתוני קוד המקור מקובץ המקור שישמשו המודול שלך. בדוק את ערך הסטטוס המוחזר כדי לראות אם כל קוד המקור נקרא למעשה. לעבד את התוכן של $ _ כדי לשנות את קוד המקור בצורה רצויה. החזר את ערך הסטטוס. אם המעשה של Unimporting המודול שלך (באמצעות לא) צריך לגרום לסינון קוד המקור כדי להפסיק, ליצור שגרות Unimport, ויש לי את זה שיחה filter_del. ודא שהשיחה ל- filter_read או filter_read_exact בשלב 5 לא קרא בטעות בעבר לא. למעשה זה מגביל קוד המקור מסננים לפעולת קו לפי שורת, אלא אם כן ייבוא שגרות עושה כמה מפואר מראש מראש ניתוח של קוד המקור הוא סינון. לדוגמה, הנה מסנן קוד המקור המינימלי במודול בשם BANG.PM. זה פשוט ממיר כל התרחשות של רצף בנגס + בנג את רצף למות 'בנג' אם $ המפץ בכל פיסת קוד בעקבות Bang שימוש; הצהרה (עד הבא לא בנג, הצהרה, אם בכלל): חבילה בנג; השתמש בסנן :: util :: התקשר; תת ייבוא {filter_add (המשנה שלי Caller = Caller, שלי ($ סטטוס, $ NO_SEEN, $ נתונים); בעוד ($ סטטוס = filter_read () {אם (/ ^ s * nos + $ callers *; s *? $ /) {$ no_seen = 1, האחרון;} $ נתונים. = $ _; $ _ = ""; $ _ = $ נתונים, S / Bangs + Bang / Die 'Bang' אם $ bang / g אלאסט סטטוס < 0; $ _ = = "no $ class, n" אם $ no_seen; לחזור 1;})} תת unimport {filter_del (); } 1; רמה זו של תחכום מכניס סינון מחוץ להישג ידם של programmers.A פתרון מסנן :: מודול פשוט מספק ממשק פשוט לסנן :: util :: התקשר; אחד כי הוא מספיק עבור המקרים הנפוצים ביותר.נסטד של התהליך לעיל, עם מסנן :: פשוט המשימה של הגדרת מסנן קוד המקור מצטמצם: הורד ולהתקין את המסנן :: מודול פשוט. (אם יש לך Perl 5.7.1 או במאוחר, זה כבר נעשה בשבילך.) הגדרת מודול שעושה מסנן שימוש :: Simple ואז קוראת מסנן {...}. בתוך שגרות אנונימית או בלוק כי הוא עבר לסנן, לעבד את התוכן של $ _ כדי לשנות את קוד המקור בצורה רצויה. במילים אחרות, בדוגמה הקודמת, תהפוך: חבילה BANG; השתמש בסנן :: פשוט; מסנן {s / בנגס + בנג / למות 'בנג' אם $ bang / g; }; 1; לב שקוד המקור מועבר כמחרוזת אחת, כך שכול regex כי שימושים ^ או $ לזהות גבולות קו יזדקקו / m flag.Requirements: · דרישות Perl: · פרל

סינון :: פשוט תוכנה קשורה