| Perl :: Metric :: Basic. Perl :: Metric :: BasicÀº ±âº» ¼ÒÇÁÆ®¿þ¾î ¸ÞÆ®¸¯À» Á¦°ø ÇÒ ¼öÀÖ´Â Perl ¸ðµâÀÔ´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
Perl :: Metric :: Basic. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Leon Brocard
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~lbrocard/
Perl :: Metric :: Basic. ű×
Perl :: Metric :: Basic. ¼³¸í
Perl :: Metric :: BasicÀº ±âº» ¼ÒÇÁÆ®¿þ¾î ¸ÞÆ®¸¯À» Á¦°ø ÇÒ ¼öÀÖ´Â Perl ¸ðµâÀÔ´Ï´Ù. Perl :: Metric :: BasicÀº ±âº» ¼ÒÇÁÆ®¿þ¾î Metrics¸¦ Á¦°ø ÇÒ ¼öÀÖ´Â Perl ¸ðµâÀÔ´Ï´Ù. Synopsis # ù ¹ø° $ Document = PPI :: Document-> Load ( "T / lib / Acme)¿¡¼ Àü´ÞÇÒ PPI :: Document °³Ã¼¸¦ ¸ÕÀú ±¸¼ºÇÕ´Ï´Ù. ¿ÀÈÄ"); # ±×·± ´ÙÀ½ ¹®¼¿¡¼ ¸ÞÆ®¸¯À» °Ë»ö MY $ M = Perl :: Metric :: Basic-> New; MY $ METRIC = $ M-> ÃøÁ¤ ($ ¹®¼); # $ metricÀº ´ÙÀ½°ú °°Àº °ÍÀ¸·Î ±¸¼ºµË´Ï´Ù : # 'acme'=> {# 'new'=> {# 'blank_lines'=> 1, # '´ñ±Û "=> 1, #'¼± '=> 7, #'lines_of_code '=> 6, #'¼ýÀÚ '=> 0, #'numbers_unique '=> 0, #'¿¬»êÀÚ '=> 3, #'operator_unique '=> 2, #'symbols '=> 5, #'symbols_unique '= > 2, # '´Ü¾î'=> 7, # 'words_unique'=> 6 #}, # ... ¼ÒÇÁÆ®¿þ¾î¸¦ ±¸¼º ÇÒ ¶§´Â Á¾Á¾ Å©°Ô ´Ù¸¥ Ç°ÁúÀÇ Äڵ带 »ý¼ºÇÕ´Ï´Ù. Perl :: Metric :: ±âº» ¸ðµâÀº PPI ¸ðµâÀ» È°¿ëÇÏ¿© Perl Äڵ忡 ´ëÇÑ Èï¹Ì·Î¿î ¼ÒÇÁÆ®¿þ¾î ¸ÞÆ®¸¯À» Á¦°øÇϸç ÁÖ·Î Å©±â¿Í À¯Áö º¸¼ö¼ºÀ» ÃøÁ¤ÇÕ´Ï´Ù. AmetricÀº ÄÚµå Á¶°¢¿¡ ´ëÇÑ °áÁ¤À» ³»¸®´Â µ¥ µµ¿òÀ̵Ǵ ÀÏÁ¾ÀÇ ÃøÁ¤ÀÔ´Ï´Ù. ...¿¡ ¸ÞÆ®¸¯¿¡ ´ëÇÑ ¾î·Á¿î ±ÔÄ¢Àº ¾øÁö¸¸ Á¦°øµÈ °ÍµéÀº ´ç½ÅÀÌ ¾Æ¿ô ¸®¾î ÀÎ ¸ðµâ ¶Ç´Â ¼ºê ·çƾ¿¡ ´ëÇÑ °áÁ¤À» ³»¸± ¼öÀÖ°Ô ÇØÁÝ´Ï´Ù. ¼ºê ·çƾÀÇ ºñÁ¤»óÀûÀÎ ÃøÁ¤Àº ÇØ´ç ·çƾÀ» Àç°ËÅäÇÏ°í ºñÁ¤»óÀûÀ¸·Î ³·Àº Ç°ÁúÀ» °Ë»ç ÇؾßÇÏ´Â °æ°í Ç¥½ÃÀÔ´Ï´Ù.ÀÌ ¸ðµâÀº PPI ¸ðµâÀ» »ç¿ëÇϹǷΠPerl Äڵ带 ±¸¹® ºÐ¼® ÇÒ ¼ö ÀÖ½À´Ï´Ù. ¼ÒÇÁÆ®¿þ¾î ¸ÞÆ®¸¯¿¡ °ü½ÉÀÌ ÀÖÁö ¾ÊÀ¸¸é Áß¿äÇÕ´Ï´Ù. Steve McConnelÀÇ "Code Complete"(Second Edition)¸¦ ÃßõÇÕ´Ï´Ù (Microsoft Press) .methodsnew () new () ¸Þ¼µå´Â »ý¼ºÀÚÀÔ´Ï´Ù. My $ M = Perl :: Metric :: Basic-> New; ÃøÁ¤ () ÃøÁ¤ () ) ¸Þ¼µå´Â ÀϺΠ¸ÞÆ®¸¯À» ÃøÁ¤ÇÏ°í Çؽà ÂüÁ¶¸¦ ¹ÝȯÇÕ´Ï´Ù. PerlÀÇ ÆÄÀÏÀº µÑ ÀÌ»óÀÇ ÆÐÅ°Áö¸¦ Æ÷ÇÔ ÇÒ ¼ö ÀÖÀ¸¸ç ÆÐÅ°Áöº°·Î ¸ÞÆ®¸¯À» º°µµ·Î ¸¸µé±â À§ÇØ Èï¹Ì ·Ó½À´Ï´Ù. Çؽà ÂüÁ¶ÀÇ Å°´Â ÆÐÅ°ÁöÀÇ À̸§ÀÌ¸ç °ªÀº ´Ù¸¥ Çؽà ÂüÁ¶ÀÔ´Ï´Ù. Packages´Â ¼ºê ·çƾÀ¸·Î ºÐ¸®µÇ¾î ÀÖÀ¸¸ç ¼ºê ·çƾº°·Î ¸ÞÆ®¸¯À» º°µµ·Î ÁöÁ¤ÇÏ´Â µ¥ Èï¹Ì ·Ó½À´Ï´Ù. µÎ ¹ø° Çؽà ÂüÁ¶ÀÇ Å°´Â ¼ºê ·çƾÀÇ À̸§ÀÌ¸ç °ªÀº metrics¸¦ Æ÷ÇÔÇÏ´Â ´Ù¸¥ Çؽà ÂüÁ¶ÀÔ´Ï´Ù. ¼ºê ·çƾ¿¡ ´Ù¾çÇÑ ¸ÞÆ®¸¯ÀÌ Àû¿ëµË´Ï´Ù. ¼¼ ¹ø° Çؽà ÂüÁ¶ÀÇ Å°´Â ¸ÞÆ®¸¯ÀÇ À̸§ÀÌ¸ç °ªÀº ¸ÞÆ®¸¯ÀÇ °ªÀÔ´Ï´Ù. ¸ÞÆ®¸¯Àº ´ÙÀ½°ú °°½À´Ï´Ù. blank_linesthe ºó ÄÚµå ¶óÀÎÀÇ ¼ö. LinestHeÀÇ ÃÑ ¼ö¸¦ Æ÷ÇÔÇÏ´Â Çà ¼ö .LumberSheÀÇ ÃÑ ¼öÀÇ ÃÑ ¼ö (¿¹ : "$ z = 42 * 3"°¡ 2 °³°¡ ÀÖ½À´Ï´Ù. ¼ýÀÚ) .numbers_uniqueTe »ç¿ë µÈ °íÀ¯ ÇÑ ¹øÈ£ÀÇ ¼ö (¿¹ : "$ z = 2 * $ x + 2 * $ y"´Â 1 °³ÀÇ °íÀ¯ ¹øÈ£°¡ ÀÖ½À´Ï´Ù). OperatorStHe »ç¿ëµÇ´Â ¿¬»êÀÚ ¼ö´Â Àͼ÷ÇÑ ¿¬»êÀÚ ¼öÀÔ´Ï´Ù. »ç¿ë µÈ ±âÈ£ (¿¹ : "$ z = $ x * $ x + $ y * $ y"´Â 5 °³ÀÇ ±âÈ£°¡ ÀÖ½À´Ï´Ù) .SYMBOLS_UNIQUETHE »ç¿ë µÈ °íÀ¯ ÇÑ ±âÈ£ ¼ö (¿¹ : "$ z = $ x * $ x + $ y * $ y" 3 °³ÀÇ °íÀ¯ ÇÑ ±âÈ£°¡ ÀÖ½À´Ï´Ù.) .WorkSTHE ÃÑ ´Ü¾î ¼ö (¿î¿µÀÚ) using.Words_uniqueThe »ç¿ëµÇ´Â µ¶Ã¢Àû ÀÎ ´Ü¾îÀÇ ¼ö. ¡¤ Perl ¿ä±¸ »çÇ× : ¡¤ Perl.
Perl :: Metric :: Basic. °ü·Ã ¼ÒÇÁÆ®¿þ¾î