הקשר :: חזר הקשר :: החזרה היא מודול Perl כדי ליצור ערכי החזרה של Senstive.
הורד עכשיו

הקשר :: חזר דירוג וסיכום

הקשר :: חזר תגים

פרל מודול לַחֲזוֹר ערכי קשר-senstive ערכי החזרה רגיש הקשר

הקשר :: חזר תיאור

הקשר :: החזרה היא מודול פרל כדי ליצור ערכי תשואה של סנסטיביים. הקשר :: החזרה היא מודול פרל כדי ליצור ערכי החזרה של Senstive. להשתמש קרפיון; Sub Foo {Return Scalar {'שלושים עשר שנים' {1} num {7 * 6} Str {'ארבעים ושתיים' רשימה {1,2,3} hashref {{name => 'foo', value = > 99}} arrayref {} globref {* stdout} coderef {croak "אל תשתמש בתוצאה זו כקוד!"; }; } # ומאוחר יותר ... אם ($ foo = foo () {foo $ לספור שלי (1 .. $ foo) {הדפס "$ לספור: $ foo הוא: n". Msgstr "מערך: @ {$ foo} n" "hash: $ foo -> {שם} => $ foo -> {ערך} n"; } הדפסה {$ foo} $ foo -> (); } בדרך כלל, כאשר אתה צריך ליצור שגרות המחזות ערכים שונים בהקשרים שונים (רשימה, scalar, או חלל), אתה כותב משהו כמו: Sub Get_Server_Status {שלי ($ server_id) = @_; # לרכישת נתוני שרת איכשהו ...% server_data = _saber_server_status ($ server_id); # החזרת רכיבים שונים של נתונים, # בהתאם להקשר שיחה ... אם (quantarray () {return @server_data {QW (שם uptime לטעון משתמשים)}; } אם (designe desarray () {return $ server_data {load}; } אם (! מוגדר Desararray (). לַחֲזוֹר; } אחר {CROAK Q {הקשר רע! לא ביסקוויט!}; }} זה עובד בסדר, אבל הקוד בהחלט יכול להיות יותר קריא. בשימוש הפשוט ביותר שלה, מודול זה עושה את זה קוד קריא יותר על ידי מתן שלושה subroutines - רשימה (), scalar (), חלל () - זה נכון רק כאשר השגרה הנוכחית נקראת בהקשר המתאים: השתמש בקשר הקשר :: לַחֲזוֹר; תת Get_Server_Status {שלי ($ server_id) = @_; # לרכישת נתוני שרת איכשהו ...% server_data = _saber_server_status ($ server_id); # החזרת רכיבים שונים של נתונים # בהתאם להקשר שיחה ... אם (רשימה) {return @server_data {QW (שם uptime לטעון משתמשים)}} אם (scalar) {return $ server_data {load}} {void] { הדפסה $ server_data {load} n "} אחר {croak q {הקשר רע! ! אין ביסקוויט}}} מקושר returnsThose שלוש שגרות יכולות לשמש גם בדרך אחרת: תוויות על שורה של אבן חזרת קשר (ידוע קולקטיבי כרצף הקשר). כאשר רצף הקשר מוחזר, היא בוחרת באופן אוטומטי את בלוק ההחזר הקשרי המתאים עבור ההקשר הקורא. אז הדוגמה הקודמת יכולה להיות כתובה עוד יותר נקי כמו: השתמש הקשר :: לחזור; תת Get_Server_Status {שלי ($ server_id) = @_; # לרכישת נתוני שרת איכשהו ...% server_data = _saber_server_status ($ server_id); # החזרת רכיבים שונים של נתונים # בהתאם להקשר שיחה ... Return (List {Return Uptime Upt_data {LAUTE} Void {Print {$ server_data {load} n "} ברירת מחדל {CROAK Q {הקשר רע לא ביסקוויט!}}); } רצף ההקשר בוחר באופן אוטומטי את הבלוק המתאים עבור כל הקשר שיחה. דרישות: · פרל · Version.pm. · Want.pm.

הקשר :: חזר תוכנה קשורה