| Netaddr :: IP :: מצא Netaddr :: IP :: מצא מודול פרל כדי למצוא כתובות IP בטקסט רגיל. |
הורד עכשיו |
Netaddr :: IP :: מצא דירוג וסיכום
- רישיון:
- Perl Artistic License
- שם המפרסם:
- Tatsuhiko Miyagawa
- אתר האינטרנט של המוציא לאור:
- http://search.cpan.org/~miyagawa/
Netaddr :: IP :: מצא תגים
Netaddr :: IP :: מצא תיאור
Netaddr :: IP :: מצא הוא מודול Perl כדי למצוא כתובות IP בטקסט רגיל. Netaddr :: IP :: מצא מודול Perl כדי למצוא כתובות IP ב text.Synopsis רגיל להשתמש netaddr :: IP :: מצא; $ num_found = find_ipaddrs ($ טקסט, התקשרות); זוהי מודול למציאת כתובות IP בטקסט פשוט. זה עובד דומה מאוד Uri :: מצא Find_uris של Find_uris () או דוא"ל :: find_emails של Find_emails (). $ num_ipaddrs_found = find_ipaddrs ($ טקסט, התקשרות); הטענה הראשונה היא טקסט לחיפוש ולתפעל. השני הוא שגרת callback אשר מגדיר מה לעשות עם כל כתובת IP כפי שהם נמצאים. זה מחזיר את המספר הכולל של כתובות IP שנמצאו. התקשרות ניתנת לשני טיעונים. הראשון הוא מופע IP של Netaddr :: IP המייצג את כתובת ה- IP. השני הוא כתובת ה- IP בפועל כפי שנמצא בטקסט. לא משנה מה החזרות Callback יחליף את הטקסט המקורי .Examples # עבור כל כתובת IP נמצאה, ping המארח שלה כדי לראות אם שלה חי. השתמש ברשת :: פינג; שלי $ pinger = net :: ping-> חדש; % שלי pinged; Find_ipaddrs ($ text, sub {שלי ($ iPaddr, $ ation) = @_; $ host = $ iPaddr-> to_string; הבא אם קיים $ pinged {$ host}; $ pinged {$ host} = $ pinger-> פינג ($ מארח);}); בעוד (שלי ($ המארח, $ up) == כל% pinged) {הדפס "$ המארח הוא". $? 'למעלה למטה' . "n"; } # פתר את כתובת ה- IP ל- FQDN Find_ipaddrs ($ טקסט, תת {שלי ($ iPaddr, $ ation) = @_; romurn_ip ($ iPaddr-> to_string);}); תת- Neturt_ip {שימוש Net :: DNS; # ראה Perldoc Net :: DNS לפרטים} דרישות: · פרל
Netaddr :: IP :: מצא תוכנה קשורה