sun's longitude:35 13 51 
¡¤ ÀÚÀ¯°Ô½ÃÆÇ ¡¤ ¹¯°í´äÇϱ⠡¤ ¾ËÆĹ®¼­ ¡¤ RPMS list
¡¤ »ç¿ëÀÚ¹®¼­ ¡¤ ÆÁ/FAQ¸ðÀ½ ¡¤ ¸®´ª½ºLinks ¡¤ ÀÚ·á½Ç
¡¤ ¼­¹öÁ¤º¸ ¡¤ ¿î¿µÀÚ ¡¤ Books/FAQ ¡¤ FreeBSD
 
/board/read.php:¼Ò½ºº¸±â   
 

Áú¹®°ú ´äº¯ °Ô½ÃÆÇÀÔ´Ï´Ù.

ÇöÀç ½Ç½Ã°£À¸·Î ÀÌ°÷ ¼­¹öÀÇ ¼³Á¤ÆÄÀÏ(¸î°³)¸¦ º¸¿©ÁÖ°í ÀÖ½À´Ï´Ù.
¼­¹öÀÇ ¼³Á¤³»¿ë¿¡ °üÇÑ Áú¹®Àº ¸ÕÀú ÀÌ°÷ ¼­¹öÀÇ ¼³Á¤³»¿ëÀ» Âü°íÇÏ½Ã±æ ¹Ù¶ø´Ï´Ù.

[*** ¾²±â ±ÝÁö´Ü¾î ÆÐÅÏ ***]
±Û º»¹® Áß°£¿¡ ¾÷·ÎµåÇÒ À̹ÌÁö¸¦ Ãß°¡ÇÏ´Â ¹æ¹ý : @@À̹ÌÁöÀ̸§@@
ex) @@foo.gif@@
2896 ¹ø ±Û: cpan \\\::Mechanize ¼³Ä¡ ¹®ÀÇ!~
±Û¾´ÀÌ: Ãʺ¸¼­ ±Û¾´³¯: 2011³â 07¿ù 06ÀÏ 11:37:02 ¼ö(¿ÀÀü) Á¶È¸: 1458
-----------------------------------------
´äº¯ÀÚ°¡ ±âº»ÀûÀ¸·Î Âü°íÇÒ ³»¿ëÀÔ´Ï´Ù.
- ¹èÆ÷ÆÇ(¿É¼Ç)    :  cent os 5.5
- Ä¿³Î¹öÀü(¿É¼Ç)  : 
- µ¥¸ó¹öÀü(¿¹:apache 1.3.27) : 
- µ¥¸ó¼³Ä¡À¯Çü(RPM/ÄÄÆÄÀÏ/±âŸ)
 : 
-----------------------------------------


¾È³çÇϼ¼¿ä ´Ù¸§À̾ƴϿÀ¶ó perlÀÇ \\\:Mechanize ÀÇ ±â´ÉÀ» ¾²±â À§ÇØ

cpan ->
install \\\::Mechanize ¸¦ ÀÔ·ÂÇÏ¿© ¸ðµç ¿É¼ÇÀ» ±âº»°ªÀ¸·Î ÁÖ°í ¼³Ä¡Çß½À´Ï´Ù


perl ÀÇ ³»¿ëÁß
use strict;
use warnings;
use WWW::Mechanize;

my $id     = 'your_naver_id';
my $passwd = 'your_naver_password';
my $reply  = 'Check!  :)';
chomp($reply);

my $url = 'http://nid.naver.com/nidlogin.login';
my $mech = WWW::Mechanize->new();
$mech->get($url);
my $res = $mech->submit_form(
    form_name => 'frmNIDLogin',
    fields    => {
        id => $id,
        pw => $passwd
    },
);

my $base_url = 'http://cafe.naver.com/AttendanceView.nhn';
my @check_urls = (
    "$base_url?search.clubid=18062050&search.menuid=6",   # 
    "$base_url?search.clubid=10586415&search.menuid=108", #
 );

for my $check_url (@check_urls){
    $mech->get($check_url);
    $mech->field('content', $reply);
    $mech->submit();

}

ÀÌ·¸°Ô Â¥°í.

perl test.pl ·Î ½ÇÇàÇϸé
[root@localhost ~]# perl test.pl
Can't locate WWW/Mechanize.pm in @INC (@INC contains:
/usr/lib/perl5/site_perl/5.8.8/i386-linux-thread-multi
/usr/lib/perl5/site_perl/5.8.8 /usr/lib/perl5/site_perl
/usr/lib/perl5/vendor_perl/5.8.8/i386-linux-thread-multi
/usr/lib/perl5/vendor_perl/5.8.8 /usr/lib/perl5/vendor_perl
/usr/lib/perl5/5.8.8/i386-linux-thread-multi /usr/lib/perl5/5.8.8 .) at test.pl line
3.
BEGIN failed--compilation aborted at test.pl line 3.


cpan ¿¡ ´Ù½Ã µé¾î°¡ 
cpan> install \\\::Mechanize
CPAN: Storable loaded ok
Going to read /root/.cpan/Metadata
  Database was generated on Tue, 05 Jul 2011 13:42:38 GMT
Warning: Cannot install \::Mechanize, don't know what it is.
Try the command

    i /\::Mechanize/

to find objects with matching identifiers.

ÀÔ·ÂÇϸé ÀÌ·¸°Ô ¶ß´Âµ¥ \::Mechanize·Î ¹Ù²¨µµ ¾ÈµË´Ï´Ù 

 ¿À·ù°¡ ³ª´Âµ¥ ¾î¶² ¹®Á¦ÀÎÁö ¸ð¸£°Ú½À´Ï´Ù.. Á¶¾ðÁ» ºÎŹµå¸³´Ï´Ù~

 
ÀÌÀü±Û : Re: ANT ¹öÀü ¾÷±×·¹ÀÌµå ¹æ¹ý
´ÙÀ½±Û : Re: cpan \\\::Mechanize ¼³Ä¡ ¹®ÀÇ!~  
 from 118.33.108.27
JS(Redhands)Board 0.4 +@

Re: ANT ¹öÀü ¾÷±×·¹ÀÌµå ¹æ¹ý Re: cpan \\\::Mechanize ¼³Ä¡ ¹®ÀÇ!~
Àμâ¿ë 


apache lighttpd linuxchannel.net 
Copyright 1997-2024. linuxchannel.net. All rights reserved.

Page loading: 0.05(server) + (network) + (browser) seconds