³ØŸÀÌ :: Netaddr :: IP.Å°°¡ ¼ºê³Ý ÀÎ Çؽø¦ ±¸ÇöÇÕ´Ï´Ù. | |
Áö±Ý ´Ù¿î·Îµå |
³ØŸÀÌ :: Netaddr :: IP. ¼øÀ§ ¹× ¿ä¾à
±¤°í
- ƯÇã:
- Perl Artistic License
- °¡°Ý:
- FREE
- °Ô½ÃÀÚ À̸§:
- Luis Mu
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~luismunoz/
³ØŸÀÌ :: Netaddr :: IP. ű×
³ØŸÀÌ :: Netaddr :: IP. ¼³¸í
Å°°¡ ¼ºê³Ý ÀÎ Çؽø¦ ±¸ÇöÇÕ´Ï´Ù TIE :: NETADDR :: IP´Â Çؽø¦ °úºÎÇϽÃÅ°´Â PERL ¸ðµâÀ̹ǷΠŰ°¡ NETADDR :: IP¿Í °°ÀÌ ¼ºê³Ý ÀÏ ¼ö ÀÖµµ·ÏÇÕ´Ï´Ù. °ªÀ» ¿Ã¸®¸é Çؽÿ¡ ÁöÁ¤µÈ ¼ºê³Ý ³»¿¡¼ ÁöÁ¤µÈ Å°¸¦ ãÀ¸·Á°í Çؼ®ÀÌ ÀÌ·ç¾îÁý´Ï´Ù. ½Ã³ñ½Ã½º¿¡¼ Á¦°øµÇ´Â ÄÚµå »ùÇÃÀº Foreach ·çÇÁÀÇ ¸ðµç ½Ã½ºÅÛÀÇ À§Ä¡¸¦ Àμâ ÇÒ °ÍÀÔ´Ï´Ù. NetAddr :: IP·Î IP ÁÖ¼Ò·Î ±¸¹® ºÐ¼® ÇÒ ¼öÀÖ´Â ¹®ÀÚ¿Àº foreach, °¢°¢ÀÇ Å° ¹× °ª°ú °°Àº ÇؽÃÀÇ Çؽÿ¡ ´ëÇÑ Å°·Î »ç¿ëµÉ ¼ö ÀÖ½À´Ï´Ù. Çؽÿ¡ Å°·Î Á¦°øµÈ ½ÇÁ¦ ¼ºê³Ý ¸¸ º¼ ¼ö ÀÖ½À´Ï´Ù. $ Çؽà {$ IPAddress}°ú °°Àº °ªÀ» ¿Ã·Á ³õÀ¸¸éÀÌ IP ÁÖ¼Ò´Â Çؽà ³»ÀÇ Å°·Î Á¸ÀçÇÏ´Â ¼ºê³Ý°£¿¡ º¸¾Ò½À´Ï´Ù. °¡Àå ±ä ¸¶½ºÅ© (Áï, °¡Àå ƯÁ¤ÇÑ ¼ºê³Ý)°¡ÀÖ´Â ÀÏÄ¡ÇÏ´Â ¼ºê³ÝÀÌ À̱â°í ¿¬°áµÈ °ªÀÌ ¹ÝȯµË´Ï´Ù.ÀÌ ÄÚµå´Â ÀûÀýÇÑ Å©·¹µ÷ÀÌ À¯ÁöµÇ´Â °æ¿ì Perl ¶óÀ̼¾½º¿¡ ¸í½ÃµÈ Á¶Ç׿¡ µû¶ó ÀÚÀ¯·Ó°Ô ¹èÆ÷ ÇÒ ¼ö ÀÖ½À´Ï´Ù. ¹ö±× º¸°í¼¿Í Çǵå¹éÀ» Ãß°¡ °³¼±À» À§ÇØ ÀúÀÚ¿¡°Ô º¸³»ÁֽʽÿÀ. Synopsis »ç¿ë Tie :: Netaddr :: IP; ³» %´Â ¾îµð¿¡ ÀÖÁö ¾Ê½À´Ï´Ù. ³ØŸÀÌ % Whereis, Tie :: Netaddr :: IP; $ thereis { "10.0.10.0/24"} = "½ÇÇè½Ç, 1 Ãþ"; $ thereis { "10.0.20.0/24"} = "µ¥ÀÌÅÍ ¼¾ÅÍ, 2 Ãþ"; $ thereis { "10.0.30.0/27"} = "¿ø°Ý À§Ä¡"; $ thereis { "0.0.0.0/0"} = "Çϳª´ÔÀº ¾îµð¿¡¼ ¾Ë°í ÀÖ½À´Ï´Ù"; $ HOST ( "10.0.10.1", "10.0.20.15", "10.0.32.17", "10.0.32.17", "10.10.0.1") {PRINT "È£½ºÆ®´Â"$ THEREIS {$ HOST}, "\ n"ÀÔ´Ï´Ù. } $ SUBNET (Å° % WHEREIS) {PRINT "³×Æ®¿öÅ©", $ ¼ºê³Ý ","$ SUBNET}, "\ n"¿¡¼ "³×Æ®¿öÅ©", $ ¼ºê³Ý "ÀÌ »ç¿ëµË´Ï´Ù. } ´©¸£Áö ¾Ê¾Æ¾ßÇÕ´Ï´Ù. ¿ä±¸ »çÇ× : ¡¤ Perl. ÀÌ ¸±¸®½º¿¡¼´Â »õ·Î¿î ±â´É : ¡¤ ÀÏ¹Ý ¾÷µ¥ÀÌÆ®. Kazuyuki MaejimaÀÇ ÆÐÄ¡ Å°, ´ÙÀ½, ´ÙÀ½, °¢ µî°ú °ü·ÃµÈ ¹ö±×¸¦ ¼öÁ¤ÇϽʽÿÀ.
³ØŸÀÌ :: Netaddr :: IP. °ü·Ã ¼ÒÇÁÆ®¿þ¾î