| Net :: שרת :: דואר :: ESMTP :: XForward net :: שרת :: דואר :: ESMTP :: Xforward הוא מודול Perl כדי להוסיף תמיכה לפקודה XForward ב Net :: שרת :: דואר :: ESMTP. |
הורד עכשיו |
Net :: שרת :: דואר :: ESMTP :: XForward דירוג וסיכום
- רישיון:
- Perl Artistic License
- שם המפרסם:
- Xavier Guimard
- אתר האינטרנט של המוציא לאור:
- http://search.cpan.org/~guimard/Net-Server-Mail-0.15/lib/Net/Server/Mail/ESMTP/XFORWARD.pm
Net :: שרת :: דואר :: ESMTP :: XForward תגים
Net :: שרת :: דואר :: ESMTP :: XForward תיאור
Net :: שרת :: דואר :: ESMTP :: Xforward הוא מודול Perl כדי להוסיף תמיכה לפקודה XForward ב Net :: שרת :: דואר :: ESMTP. Net :: שרת :: דואר :: ESMTP :: XForward הוא מודול Perl כדי להוסיף תמיכה לפקודה XForward ב Net :: שרת :: דואר :: ESMTP.Synopsis שימוש NET :: שרת :: דואר :: ESMTP; שלי @local_domains = QW (Example.com Example.org); שרת $ שלי = חדש IO :: Socket :: Int תקשיב => 1, Localport => 25; שלי $ conn; בעוד ($ Conn = $ Server-> קבל) {שלי $ ESMTP = NEW NET :: שרת :: דואר :: ESMTP Socket => $ Conn; # הפעל כמה הרחבות $ $ ESMTP-> הרשמה ('Net :: שרת :: דואר :: ESMTP :: XForward'); # הוספת כמה מטפלים $ ESMTP-> Set_CallBack (RCPT => Validate_ReCipient); $ ESMTP-> תהליך (); $ conn-> סגור ()} Sub Validate_ReCipient {שלי ($ הפעלה, נמען $) = @_; התחום שלי; אם ($ הנמען = ~ ~ @ @. } אם (לא מוגדר תחום $) {return (0, 513, 'שגיאת תחביר.'); } Elsif (לא (GREP $ תחום EQ $ _, @ local_domains) $ _ @ local_domains) $ session-> get_forwarded_addr! = "10.1.1.1") {return (0, 554, $ נמען: כתובת נמען נדחתה: גישה ממסר נדחתה "); } חזרה (1); בעת שימוש ב- A Net :: שרת :: דואר :: ESMTP בתוך MTA ולא מול אינטרנט, ערכים כמו כתובת ה- IP של הלקוח אינם נגישים לתסריט וכאשר התסריט מחזיר דואר למופע אחר של Daemon SMTPD, זה יומני "localhost" ככתובת נכנסת. כדי לפתור בעיה זו, מנהלי מערכת מסוימים משתמשים בפקודה XForward. מודול זה נותן את היכולת לקרוא ולאחסן מידע Xforward. דרישות: · פרל
Net :: שרת :: דואר :: ESMTP :: XForward תוכנה קשורה