Net :: ewtoo :: בוט net :: ewtoo :: בוט הוא מודול לקוח רובוט לדבר.
הורד עכשיו

Net :: ewtoo :: בוט דירוג וסיכום

Net :: ewtoo :: בוט תגים

פרל מודול רוֹבּוֹט דַבְּרָן רובוט דברן Ewtoo בוט Ewtoo

Net :: ewtoo :: בוט תיאור

Net :: Ewtoo :: Bot הוא מודול לקוח רובוט לדבר. Net :: Ewtoo :: Bot הוא AWTOO תואם Talker רובוט הלקוח מודול.Synopsis להשתמש Net :: Ewtoo :: Bot; $ $ name = 'Jodbot'; BOT $ BOT = NET NET :: EWTOO :: BOT; $ bot-> add_trigger ("(. +?) אומר '$' שם, (+?) '", handle_say); $ bot-> set_delay ('טווח', 0, 5); $ BOT-> כניסה ($ Host, $ Port, $ USER, $ לעבור); $ bot-> אומר ("היי, אני רובוט $ $!"); $ BOT-> תקשיב (); $ BOT-> יציאה (); יְצִיאָה; Sub Handle_Say {שלי ($ sayer, $ אמר) = @_; אם ($ אמר EQ 'שלום') {$ bot-> אומר ("למה שלום $ Sayer!"); } Elsif ($ אמר EQ 'בבקשה ללכת רחוק') {$ bot-> אומר ("בסדר, ביי!"); $ BOT-> יציאה (); } חזרה; } שיטות $ BOT-> כניסה ($ Host, $ Port, $ משתמש, $ PASS); זה יומני בוט לתוך $ המארח: $ Port Talker באמצעות $ USER ו $ לעבור. הבוט ישלח מרכבה נוספת מחזירה לעקוף את Mots והודעות שנשמרו. כל שרת משנה מוגדרת מתבצעת בשלב זה. $ BOT-> יציאה ($ הודעה); שולח את הפקודה "צא" (בבירות עבור התאימות עם MBA4), וסוגרת את השקע. כל שרת התנתקות מוגדרת מבוצעות מראש. אם ההודעה האחרונה מוגדרת, הבוט קורא לפיקוד "mquit" עם $ הודעה כמו הטיעון שלה. $ BOT-> Set_Delay ($ סוג, $ נמוך יותר, שיטה זו קובעת את העיכוב בין השיחות של שיטה לביצוע שלה. זה שימושי להוספת עיכוב מציאותי במהלך התקשורת עם משתמש אחר. $ סוג יכול להיות גם "קבוע", ובמקרה זה העיכוב הוא תמיד נמוך יותר (בשניות) ו $ עליון מתעלמת, או 'טווח', ובמקרה זה העיכוב יהיה מספר אקראי של שניות בין $ נמוך ל עֶלִיוֹן. $ bot-> add_trigger ($ דפוס, $ callback); שיטה זו מוסיפה טריגר המשמש את השיטה האזנה (). כאשר שורה של קלט מתקבלת תואם $ דפוס, $ Callback מבוצע. הוויכוחים ל- $ Callback הם כל תושבים שנתפסו שאתה מגדיר את הדפוס שלך, שהוא regexp רגיל Perl (ללא נגרר ו מוביל חתכים). $ BOT-> DELETE_TRIGGER ($ דפוס); מסיר את ההדק המשויך לדפוס $ מתוך רשימת ההדק. $ BOT-> DEM_LOGIN ($ Callback); מציין שגרתית עם $ Callback שיוצוצאה להורג לאחר יומני BOT ב $ BOT-> Def_Logout ($ Callback); מציין שגרות עם $ Callback שיוציאו לפני יומני הבוט הַחוּצָה. $ bot-> להקשיב ($ verbose); להקשיב () קורא קלט מהדיבר ומבצע מפעיל לפי הצורך. אם $ verbose מוגדר 1, אז כל קלט שהתקבל מודפס כדי stdout. $ bot-> לשבור (); $ לשבור () קובע דגל שאומר את האזנה () שיטה לסיים ולחזור. $ bot-> אומר ($ str); פונקציה נוחות שהופך את הבוט לומר $ str. $ bot-> חושב ($ str); פונקציה נוחות שהופך את הבוט לחשוב $ str. $ BOT-> לצעוק ($ str); פונקציה נוחות שהופכת את בוט לצעוק $ str. $ BOT-> לספר ($ משתמש, $ str); פונקציה נוחות שעושה את BOT לספר $ Str כדי משתמש $. $ BOT-> הפקודה ($ cmd); מאפשר קורא של פקודה לדבר שרירותי. $ BOT-> Getline (); קורא שורה אחת של קלט מהדיבר. דרישות: · פרל

Net :: ewtoo :: בוט תוכנה קשורה