net :: traceroute. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Daniel Hagerty
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~hag/
net :: traceroute. ű×
net :: traceroute. ¼³¸í
Perl ±â¹Ý Traceroute ±â´É net :: traceroute´Â perl.synopsis¿¡¼ traceroute ±â´ÉÀ» Á¦°øÇÕ´Ï´Ù net :: traceroute; $ tr = net :: traceroute-> new (host => "life.ai.mit.edu"); if ($ tr-> ¹ß°ß) {my $ hops = $ tr-> È©; if ($ hops> 1) {print "¶ó¿ìÅÍ°¡"¿´½À´Ï´Ù. $ TR-> hop_query_host ($ tR-> È© - 1, 0). ...¿¡ " ";}}ÀÌ ¸ðµâÀº Perl5¿¡ ´ëÇÑ TracerOute (1) ±â´ÉÀ» ±¸ÇöÇÕ´Ï´Ù. ±×°ÍÀº °æ·Î IP ÆÐŶÀ» ´ë»ó¿¡ ÃßÀû ÇÒ ¼ö ÀÖ½À´Ï´Ù. ÇöÀç ½Ã½ºÅÛ traceroute ¸í·É ÁÖÀ§ÀÇ Æļ·Î ±¸ÇöµË´Ï´Ù. ¿ä±¸ »çÇ× : ¿ä±¸ »çÇ× : ¿ä±¸ »çÇ× : ¿ä±¸ »çÇ× : ¿ä±¸ »çÇ× : ¡¤ Perl.
net :: traceroute. °ü·Ã ¼ÒÇÁÆ®¿þ¾î