¾ÆÀ̵ð ºñ¹Ð¹øÈ£ | ȸ¿ø°¡ÀÔ | ºñ¹Ð¹øÈ£ºÐ½Ç
   
¡¡»õ·Î¿î¼Ò½Ä
¡¡FAQ
¡¡À¥ÇÁ·Î±×·¥
¡¡À¥DB
¡¡À¥¼­¹ö
¡¡À¥ÇÁ·Î±×·¥¼öÁ¤
¡¡ÇØÇÇÄ®·³
¡¡°ñµåÆÁ
 
Á¦ÀÛÀÇ·Ú
À¥ÇÁ·Î±×·¥ ÆǸŸô
 
ÇöÀçÀ§Ä¡: ¸ÞÀÎ ÇØÇÇÆ÷·³ À¥µðºñ : °Ô½Ã¹° Àбâ
  2000-06-01 (19:51:10) from 0.0.0.0
  ÀÛ¼ºÀÎ : Anonymous Á¶È¸¼ö : 2731   
Á¦¸ñ : crontabÀ¸·Î ÆÞÀ» ½ÇÇàÇÏ·Á´Âµ¥.. È­ÀϾ²±â°¡.. ¾ÈµÇ³×¿è.

¾È³ÉÇϼ¼¿ä...
¶Ç Áú¹®ÀÌ ÀÖ´«µ¥¿ä....
Å©·ÐÀ¸·Î µðºñ¸¦ ¾÷µ«ÇÏ·Á°í ÇÕ´Ï´Ù..
µðºñ´Â ¾÷´ñÀÌ Àß µÇ´Âµ¥.. ¾÷´ñÇÒ ·Î±×È­ÀÏÀ» ¸¸µå·Á°í Çϴµ¥
È­ÀϾ²±â°¡ ¾ÈµÇ´Â±º¿ä... Á÷Á¢ ½©»ó¿¡¼­ ½ÇÇà½ÃÅ°¸é µÇ´Âµ¥..
Å©·ÐÀ¸·Î µ¹¸°°æ¿ì´Â È­ÀÏ¿¡´Ù ¾²±â°¡ ¾ÈµÇ³×¿è...
¼Ò½º´Â ´ÙÀ½°ú °°½À´Ï´Ù¾Æ~~~
#!/usr/bin/perl

#####µðºñ Á¢¼ÓÇϱâ
use DBI;
$dbh = DBI->connect(
DBI:mysql:test:localhost
,
root
,
rhkdvkakstp
);
############################################################

#####È­ÀÏ ¿­¾î¼­ Áö±Ý ½Ã°£À̶û Áý¾î³Ö±â..
$time = localtime(time());
$filename = &get_filename;
if(-e "$filename") {
        open(fh,">>$filename");
} else {
        open(fh,">$filename");
}
flock(fh,2);
print fh "

Áö±Ý ½Ã°¢Àº ",$time," ±¤ÆÄÇ¥ µðºñ ¾÷´ñ½ÃÀÛ..
";
flock(fh,8);
close(fh);
############################################################

#####ÁüºÎÅÍ ½ÃÀÌÀÛ~~~~~
$que = "select * from test";
$result = $dbh->prepare($que);
$result->execute;
$num = $result->rows;
for($i=0;$i<$num;$i  ) {
        @temp = $result->fetchrow_array;
        $time = time();
        if($temp[2] < $time) {
                &update(@temp);
        }
}
exit;
############################################################


############################################################
#
#¼­ºÎ·çƾ
#

sub get_filename { ##·Î±×È­ÀÏÀÇ À̸§ ¼³Á¤
        my($sql,$result,@temp,$filename);
        $sql = "select DATE_FORMAT(now(),
Ymd
)";
        $result = $dbh->prepare($sql);
        $result->execute;
        @temp = $result->fetchrow_array;
        $filename = $temp[0];
        return $filename;
}

sub update { ##½Ã°£ÀÌ Áö³µÀ»°æ¿ìÀÇ µðºñ ¾÷µ« ·çƾ
        my(@temp) = @_;
        my($que,$result);
        $que = "update test set ing=
n
where aud_id=
$temp[1]
";
        $result = $dbh->prepare($que);
        $result->execute;
        if($result != "") {
                &write_log(@temp);
        } else {
                &error_log(@temp);
        }
}

sub write_log { ##¾÷´ñÀÌ Àß´ë¶ß¸é ¿ä°Å...
        my(@temp) = @_;
        my($filename);
        $filename = &get_filename;
        if(-e "$filename") {
                open(fh,">>$filename");
        } else {
                open(fh,">$filename");
        }
        flock(fh,2);
        print fh $temp[0],"&pip;",$temp[1],"&pip;",$temp[2],"&pip;",$temp[3],"
";
        flock(fh,8);
        close(fh);
}

sub error_log { ##¾÷´ñÀÌ Àß ¾È´ë¶ß¸é ¿ä°Å...
}

#
#¼­ºÎ·çƾ ³¡
#
############################################################
À§¿Í °°½À´Ï´Ù...
Å©·ÐÀ» µ¹¸±¶§´Â root±ÇȯÀ¸·Î µ¹¸®°Ô Çسù±¸¿ä..
µð·ºÅ丮³ª È­ÀÏÆ۹̼ÇÀº ·çÆ®°¡ ÀÐ°í ¾²±â ±ÇÇÑÀ¸·Î Çؼ­ ¾ÈµÇ±æ·¡.. 777 ·Î ÁÖ±¸
Çϴµ¥µÎ Àß ¾ÈµË´Ï´Ù..
¿Ö È­ÀÏ¿¡´Ù ¾²±â°¡ ¾ÈµÇ´Â°É±î¿ä...



   ¸Þ¸ð

³²°ÜÁø ¸Þ¸ð°¡ ¾ø½À´Ï´Ù.

:³×¸Â¾Æ¿ä: :È­³ª´Â±º¿ä: :Àá¿Í: :¿ì¿ïÇØ: :À̰ǾƳÄ: :¿ÕÇÏÇÏ: ¿Õ¿ôÀ½~ ³î·¥~

  

 
¨Ô
Á¦¸ñ
ÀÛ¼ºÀÎ
Á¶È¸
µî·ÏÀÏ
crontabÀ¸·Î ÆÞÀ» ½ÇÇàÇÏ·Á´Âµ¥.. È­ÀϾ²±â°¡.. ¾ÈµÇ³×¿è.
Anonymous
2732
2000-06-01
 



  HOME | ȸ»ç¼Ò°³ | Á¦ÀÛÀÇ·Ú | °³ÀÎÁ¤º¸Ãë±Þ¹æħ | CGIMALL | ÀÚ·á½Ç | »çÀÌÆ®µî·Ï | ·©Å·100 | Æ÷·³ | Ãʺ¸°¡À̵å | Áú¹®°ú´äº¯ | ¹è³Ê±¤°í
Copyright¨Ï1997~2008 HappyCGI All rights reserved
Powered By HappyCGI