Å×½ºÆ® :: Smart.Àΰ£ Áö´ÉÀÌ ÀÚµ¿À¸·Î ÇÊ¿äÇÑ °ÍµéÀ» Å×½ºÆ®ÇÕ´Ï´Ù. | |
Áö±Ý ´Ù¿î·Îµå |
Å×½ºÆ® :: Smart. ¼øÀ§ ¹× ¿ä¾à
±¤°í
- ƯÇã:
- Perl Artistic License
- °¡°Ý:
- FREE
- °Ô½ÃÀÚ À̸§:
- Edgar A. Bering
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~trizor/
Å×½ºÆ® :: Smart. ű×
Å×½ºÆ® :: Smart. ¼³¸í
Àΰ£ Áö´ÉÀÌ ÀÚµ¿À¸·Î ÇÊ¿äÇÑ °ÍµéÀ» Å×½ºÆ®ÇϽʽÿÀ Test :: Smart´Â ÄÄÇ»ÅÍ°¡ ½±°Ô ´äº¯ ÇÒ ¼ö¾ø´Â Å×½ºÆ® Áú¹®À» ¹¯´Â ÀÚµ¿È µÈ ¹æ¹ýÀ» ÅëÇÕÇÏ¿© ÇöÀç Å×½ºÆ® µµ±¸ ¼¼Æ®ÀÇ ±¸¸ÛÀ» ä¿ì´Â °ÍÀ» ¸ñÇ¥·ÎÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù. ¶Ç´Â "ÀÌ Ãâ·ÂÀÌ Ä«Å×°í¸® x¿¡ ÀûÇÕÇմϱî?" ¶Ç´Â "ÀÌ »ê¶õÇÑ Ç°ÁúÀÌ ÀÖ½À´Ï±î?" ±×¸®°í ¿©ÀüÈ÷ Ç¥ÁØ Å×½ºÆ® µµ±¸°¡ º¸°í¼¸¦ »ý¼ºÇϴ¸鿡¼ Ç¥ÁØ Å×½ºÆ® µµ±¸°¡ ¿Ã¹Ù¸£°Ô ÀÛµ¿Çϵµ·Ï Çã¿ëÇÏ°í, Å×½ºÆ®°¡ Àü´ÞµÇÁö ¾ÊÀ¸¸é ¹®À» Àá±×°í ÀÖ½À´Ï´Ù. Å×½ºÆ® :: Builder¿¡¼ ºôµåµÇ°í Å×½ºÆ® :: ´Ü¼ø , Å×½ºÆ® :: ´õ ¸¹Àº °Íµé°ú ±×µéÀÌ Áñ°Ì°Ô ³î°í ÀÖ½À´Ï´Ù. °³³äÀû Áú¹®¿¡ ´ëÇÑ Çö¸íÇÑ ´äº¯À» Á¦°øÇϱâ À§ÇØ ¿ì¸®´Â ½ÇÁ¦·Î ±â°è ÀÎÅÚ¸®Àü½º¿¡ °üÇÑ ¸Å¿ì ¾î·Á¿î ¹®Á¦¸¦ ÇØ°áÇÏ´Â ´ë½Å¿¡ »ç¶÷µé¿¡°Ô ¹¯´Â °ÍÀ¸·Î ¼ÓÀÓ¼ö¸¦ ¹¯´Â °ÍÀÔ´Ï´Ù. ÀÌ°ÍÀº »ç¶÷µé°ú À̾߱â ÇÒ ¼öÀÖ´Â ¹æ¹ýÀ» ¼³Á¤ÇÏ°í ´äº¯À» ºÎµå·´°Ô ÇÒ ¼öÀÖ´Â ½Ã°£À» Á¦°øÇØ¾ß ÇÒ ¶§±îÁö Á¶±Ý ´õ ¿À¹ö Çìµå°¡ ÇÊ¿äÇÕ´Ï´Ù. ½Ä ³ëÇÁ ½º Å×½ºÆ® :: Smart Import => , tests => 7; ÈÞ¸Õ ÀÎÅÍÆäÀ̽º¸¦ ½ÃÀÛ : ÃʱâÈ ( "test :: smart :: interface :: subclass", 'subclass args'...); µ¿½Ã¿¡ ¿¹ ¶Ç´Â ¾Æ´Ï¿À ´äº¯À» ±â´Ù¸®°í ±â´Ù¸³´Ï´Ù. get_yes ("Àǹ®"); get_no ( "Áú¹®"); µ¿ÀÏÇÏÁö¸¸ ½Ã°£ ÃÊ°ú (ÃÊ) get_yes ( "Fast Asnwer", 10); get_no ( "ºü¸¥ °ÅºÎ", 10); ºñµ¿±â Áú¹®À» Á¦ÃâÇϽʽÿÀ : $ Áú¹® = ask ( "½Ã°£ÀÌ °É¸± ¼ö ÀÖ½À´Ï´Ù"); ´äº¯À» È®ÀÎÇϽʽÿÀ : ´äº¯ ($ Áú¹®, '¿¹'); ´äº¯ ($ Áú¹®, '¾Æ´Ï¿À'); ¼öÇ¥µµ ½Ã°£ ÃÊ°ú : ´ë´ä ($ Áú¹®, '¿¹', 10); ¿ä±¸ »çÇ× : ¡¤ Perl.
Å×½ºÆ® :: Smart. °ü·Ã ¼ÒÇÁÆ®¿þ¾î