[Áöµð³ÝÄÚ¸®¾Æ]¿ÀǼҽº´Â ¹ö±×°¡ Àְųª ¸¾¿¡ ¾Èµå´Â ºÎºÐÀÌ ÀÖÀ¸¸é °íÃļ ÀÌ ³»¿ëÀ» ´Ù½Ã ¿ø ÀÚ¿¡°Ô º¸³¿À¸·Î½á ÇÁ·Î±×·¥ °³¼±¿¡ °øÇåÀ» ÇÒ ¼ö ÀÖ´Ù´Â ÀåÁ¡ÀÌ ÀÖ½À´Ï´Ù. ¿ÀǼҽº·Î ÇÁ·Î±×·¥À» ¸¸µç´Ù¸é ¾î¶»°Ô ÇÁ·Î±×·¡¹ÖÇÏ´Â °ÍÀÌ ÁÁÀ»±î¿ä? ¾î¶»°Ô Â¥¾ß ´Ù¸¥ À̵éÀÌ º¸°í Äڵ带 °³¼±½ÃÄÑ ÁÙ±î¿ä?
¼Ò½º¸¦ º¸´Âµ¥ ÀÖ¾î Âü°íÇÒ¸¸ÇÑ ¹®¼¸¦ ³Ö¾îµÎ´Â °Íµµ ÁÁ½À´Ï´Ù. ±×¸®°í Äڵ带 Àß Á¤¸®Çؼ º¸±â ÁÁ°Ô ÇØÁÖ´Â °Íµµ ÁÁÀ» °Í °°½À´Ï´Ù. ÇÏÁö¸¸ Àú´Â ±×·± °Íº¸´Ù ÇÁ·Î±×·¥ ±¸Á¶¸¦ À̺¥Æ® Äݹé(event-callback) ÇüÅ·Π±¸¼ºÇÏ´Â °ÍÀÌ ÆíÇÏÁö ¾ÊÀ»±îÇÏ´Â »ý°¢À» Çß½À´Ï´Ù. ±×·¯¸é Ç÷¯±×ÀÎÀ» ±¸¼ºÇϱⰡ ½¬¿öÁø´Ù´Â ÀåÁ¡ÀÌ ´«¿¡ ¶ë´Ï´Ù. À̹ø È£¿¡¼´Â ÀÌ·¸°Ô Â¥¿©Áø ¼Ò½º¸¦ º¸¿©µå¸®°Ú½À´Ï´Ù.
Ç÷¯±×ÀÎÀÌ ¸ðµç °ÍÀ» ´ÙÇÑ´Ù, perlbot
IRC(Internet Relay Chating)¸¦ »ç¿ëÇÏ´Ùº¸¸é Àϸí IRC botÀ̶ó°í ºÎ¸£´Â automate Ŭ¶óÀÌ¾ðÆ®¸¦ º¸°Ô µË´Ï´Ù(À̾߱â ÇÁ·Î±×·¥¿¡ ÀÖ´Â ÀÚµ¿¹ÝÀÀ°ú °°´Ù°í »ý°¢ÇÏ¸é µË´Ï´Ù). Á¦°¡ óÀ½À¸·Î ³»ºÎ¸¦ µé¿©´Ùº¸°Ô µÈ ÀÚÀ¯ ¼ÒÇÁÆ®¿þ¾î´Â perlbotÀ̶ó´Â IRC botÀÔ´Ï´Ù. ¼Ò½º´Â ¸íĪ¿¡ °É¸Â°Ô perl·Î µÇ¾î ÀÖ½À´Ï´Ù(perlÀº ¿À·§µ¿¾È ¾²¿©Á® ¿©·¯ ¶óÀ̺귯¸®µéÀÌ ¸¹ÀÌ ÃàÀûµÇ¾î ¿Ô°í, ¡®ÇÑ °¡Áö ÀÏÀ» ÇÏ´Â ¹æ¹ýÀº ¿©·¯ °¡Áö´Ù¡¯¶ó´Â ¸»¿¡ °É ¸Â´Â °·ÂÇÑ ¾ð¾îÀ̱⵵ Çϸç, ±× ¾öû³ ÀÚÀ¯ ¶§¹®¿¡ ´Ù¸¥ ÀÌÀÇ ¼Ò½º¸¦ º¸´Â °ÍÀÌ ±²ÀåÈ÷ ±«·Ó´Ù´Â ÆòÆÇÀ» °®°í ÀÖ´Â ¾ð¾îÀÔ´Ï´Ù. Àü ÀüÀÚ ¶§¹®¿¡ perlÀ» ÁÁ¾ÆÇÕ´Ï´Ù).
perlbotÀº º»Ã¼´Â config ÆÄÀÏÀ» ÀÐ¾î¼ ¼³Á¤ÇÏ´Â ºÎºÐ°ú IRC¿¡¼ ÀϾ´Â ¿©·¯ °¡Áö Àϵé(´ëÈ, ±Ó¼Ó¸», ´Ù¸¥ »ç¿ëÀÚÀÇ ·Î±×ÀÎ/·Î±×¾Æ¿ô)À» Àâ¾Æ¼ ±â·ÏÇϰųª ¸ðµâ¿¡°Ô ³Ñ±â´Â ÀÏÀ» ÇÏ´Â ºÎºÐ, perlbot¿¡ µî·ÏµÈ »ç¿ëÀÚ¸¦ °ü¸®ÇÏ´Â ºÎºÐ, ¸ðµâÀ» °ü¸®ÇÏ´Â ºÎºÐÀ¸·Î ³ª´µ¾îÁ® ÀÖ½À´Ï´Ù. óÀ½¿¡ math ¸ðµâÀÌ ÆíÇØ¼ °¡Á®´Ù ¾²±â ½ÃÀÛÇß½À´Ï´Ù.
-math ibase=16;47
71
-math 28*384
10752
±×·±µ¥ À¯´Ð½º¿¡ ÀÖ´Â bc¶ó´Â ÇÁ·Î±×·¥¿¡ ¸í·É¾î¸¦ Àü´ÞÇØÁÖ°í, ±× °á°ú¸¦ ¹Þ´Â °£´ÜÇÑ ¸ðµâ¿¡ ½É°¢ÇÑ ¹ö±×°¡ ÀÖ´õ±º¿ä.
-math "`ls`"
ÀÌ¿Í °°ÀÌ ÇØÁÖ¸é perlbotÀÌ ½ÇÇàÇÏ´Â ¼¹öÀÇ µð·ºÅ丮¸¦ °á°ú·Î º¸¿©ÁÝ´Ï´Ù. ÀÌ°É °£´ÜÈ÷ ÀÀ¿ëÇÏ¸é ½Ã½ºÅÛ passwd ÆÄÀϱîÁö º¼ ¼ö ÀÖ´Â ¹®Á¦Á¡À» ³ëÃâÇϰí ÀÖ¾ú½À´Ï´Ù. ±×·¡¼ argument¸¦ ¹Þ´Â ºÎºÐ¿¡¼ ÀÌ»óÇÑ ±âÈ£¸¦ Á¦°ÅÇϵµ·Ï °íÄ¡·Á°í ¼Ò½º¸¦ ºÃ½À´Ï´Ù(¡®ÀÌ´ÞÀÇ µð½ºÄÏ¡¯ ÂüÁ¶). ÇÏÁö¸¸ ±×°Íº¸´Ù Á¦ °ü½ÉÀ» ²ô´Â °ÍÀº Plugin.pmÀ̶ó´Â ÆÄÀÏÀÇ ±¸Á¶¿´½À´Ï´Ù.
package Math::Plugin;
use Perlbot;
use POSIX;
sub get_hooks {
return { public => \&on_public, msg => \&on_msg };
}
ÀÌ ºÎºÐÀÌ perlbot¿¡¼ °¢ Ç÷¯±×ÀεéÀÌ ¾î¶»°Ô ¿òÁ÷ÀÌ´Â °¡¿¡ ´ëÇÑ ½Ç¸¶¸®¸¦ ¾Ë·ÁÁÝ´Ï´Ù. perlbotÀº ´ÙÀ½ À̺¥Æ®¿¡ ´ëÇØ Äݹé ÇÔ¼ö°¡ °É·Á ÀÖ´ÂÁö È®ÀÎÇϰí, ÀÖÀ¸¸é ÇØ´ç Äݹé ÇÔ¼ö¸¦ ½ÇÇàÇÕ´Ï´Ù.