| www :: Checksite :: Spider. www :: Checksite :: Spider´Â À¥ °Å¹Ì¸¦À§ÇÑ ±âº» Ŭ·¡½ºÀÔ´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
www :: Checksite :: Spider. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Abe Timmerman
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~abeltje/WWW-CheckSite-0.018/lib/WWW/CheckSite/Spider.pm
www :: Checksite :: Spider. ű×
www :: Checksite :: Spider. ¼³¸í
www :: Checksites :: Spider´Â À¥À» °Å¹ö¸® ÇÎÇϱâÀ§ÇÑ ±âº» Ŭ·¡½ºÀÔ´Ï´Ù. www :: Checksite :: Spider´Â Web.Snopsis »ç¿ë WWW :: üũ »çÀÌÆ® :: ½ºÆÄÀÌ´õ¸¦ »ç¿ëÇÏ´Â ±âº» Perl Ŭ·¡½ºÀÔ´Ï´Ù. MY $ SP = www :: Checksite :: Spider-> New (URI => http://www.test-smoke.org ',); while (my $ page = $ sp-> get_page) {# $ ÆäÀÌÁö´Â ±âº» Á¤º¸°¡ÀÖ´Â ÇؽÃ}À̰ųª HTTP ±âº» ÀÎÁõ µÚ¿¡ÀÖ´Â »çÀÌÆ®ÀÇ Spider¿¡ ÀÖ½À´Ï´Ù. ÆÐÅ°Áö ba_mech; ±âº» 'www :: mechanize'¸¦ »ç¿ëÇϽʽÿÀ. sub get_basic_credentials {( 'abeltje', '*******')} ÆÐÅ°Áö ¸ÞÀÎ; www :: Checksite :: Spider; MY $ SP = www :: Checksite :: Spider-> New (UA_CLASS => BA_MECH ', URI =>'http://your.site.with.ba/ ',); while (my $ page = $ sp-> get_page) {# $ ÆäÀÌÁö´Â ±âº» Á¤º¸°¡ÀÖ´Â ÇؽÃ}ÀÌ ¸ðµâÀº www :: Mechize¸¦ ±â¹ÝÀ¸·Î ±âº» À¥ ½ºÆÄÀÌ´õ¸¦ ±¸ÇöÇÕ´Ï´Ù. "Still-to-fetch"½ºÅÿ¡ ÆäÀÌÁö¸¦ ¹èÄ¡ÇÏ´Â °ÍÀÌ ÇÊ¿äÇÕ´Ï´Ù. URI°¡ µ¿ÀÏÇÑ ¿øÁ¡ ¸¸ °ãÃÄÁ® ¼¹ö¿¡¼ ·Îº¿ ±ÔÄ¢À» °í·ÁÇÏ¿© °í·ÁÇÕ´Ï´Ù. ¿ä±¸ »çÇ× : ¡¤ Perl.
www :: Checksite :: Spider. °ü·Ã ¼ÒÇÁÆ®¿þ¾î