| ¹ÙÀÌ¿À ::Áöµµ :: ¸Ê½º ¿©·¯ °³ÀÇÁöµµ¿¡¼ ¿©·¯ À§Ä¡¸¦ °¡Áú ¼öÀÖ´Â ÀÏ¹Ý ¸Ê ¿ä¼Ò¸¦ ³ªÅ¸³»´Â °´Ã¼ÀÔ´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
¹ÙÀÌ¿À ::Áöµµ :: ¸Ê½º ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~sendu/
¹ÙÀÌ¿À ::Áöµµ :: ¸Ê½º ű×
¹ÙÀÌ¿À ::Áöµµ :: ¸Ê½º ¼³¸í
¿©·¯Áöµµ¿¡¼ ¿©·¯ À§Ä¡¸¦ °¡Áú ¼öÀÖ´Â ÀÏ¹Ý ¸Ê ¿ä¼Ò¸¦ ³ªÅ¸³»´Â °´Ã¼ÀÔ´Ï´Ù. BIO :: Map :: MappableÀº ¿©·¯ ¸Ê¿¡¼ ¿©·¯ À§Ä¡¸¦ °¡Áú ¼öÀÖ´Â ÀÏ¹Ý ¸Ê ¿ä¼Ò¸¦ ³ªÅ¸³»´Â Perl °´Ã¼ÀÔ´Ï´Ù. µ¿ÀÏÇÑ ¸Ê¿¡ÀÖ´Â µÎ °³ÀÇ ´Ù¸¥ À§Ä¡¿¡ÀÖ´ÂÁöµµ ¿ä¼Ò $ map1 = new bio :: map :: simplemap ( ); $ protection1 = »õ ¹ÙÀÌ¿À ::Áöµµ :: À§Ä¡ (-map => $ map1, -value => 100); $ protection2 = »õ ¹ÙÀÌ¿À ::Áöµµ :: À§Ä¡ (-map => $ map1, -value => 200); $ mappable = new bio :: map :: mappable (-positions => ); # ´Ù¸¥Áöµµ¿¡ ´Ù¸¥ À§Ä¡ Ãß°¡ $ map2 = new bio :: map :: simplemap (); $ PROYMENT3 = »õ·Î¿î ¹ÙÀÌ¿À ::Áöµµ :: À§Ä¡ (-map => $ map2, $ value => 50); $ mappable-> add_position ($ probtion3); # {$ mappable-> get_positions ($ map1)) {print $ pos-> °ª "À» À§´ëÇÑ ¸Ê ($ mappable-> °ª", " ";}ÀÌ °´Ã¼´Â ÀÏ¹Ý ¸Ê ¿ä¼ÒÀÇ °³³äÀ» ó¸®ÇÕ´Ï´Ù. Mappables´Â Çϳª ÀÌ»óÀÇ Map¿¡ Çϳª ÀÌ»óÀÇ À§Ä¡°¡ÀÖ´Â ¿£Æ¼Æ¼ÀÔ´Ï´Ù.ÀÌ °´Ã¼´Â Bio :: Map :: MappableiÀÇ ¼ø¼öÇÑ Perl ±¸ÇöÀÔ´Ï´Ù. ÇØ´ç ÀÎÅÍÆäÀ̽º´Â ±× ÀÎÅÍÆäÀ̽º¸¦ ±¸ÇöÇÕ´Ï´Ù. ÀÚ½ÅÀÇ ¹æ¹ýÀº ±×°÷¿¡¼ ¹®¼¸¦ È®ÀÎÇϽʽÿÀ. ¿ä±¸ »çÇ× : ¡¤ Perl.
¹ÙÀÌ¿À ::Áöµµ :: ¸Ê½º °ü·Ã ¼ÒÇÁÆ®¿þ¾î