| Æ÷µå :: ½º ´ÏÆê ´ÜÀ§ Å×½ºÆ® (¶Ç´Â ´Ù¸¥ Perl ÄÚµå)¿¡¼ »ç¿ëÇϵµ·Ï Æ÷µåÀÇ ½º ´ÏÆêÀ» ÃßÃâÇÏ°í ´Ù½Ã Æ÷¸ËÇϽʽÿÀ. |
Áö±Ý ´Ù¿î·Îµå |
Æ÷µå :: ½º ´ÏÆê ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Dominique QUATRAVAUX
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~domq/
Æ÷µå :: ½º ´ÏÆê ű×
Æ÷µå :: ½º ´ÏÆê ¼³¸í
À¯´Ö Å×½ºÆ® (¶Ç´Â ´Ù¸¥ Perl ÄÚµå)¿¡¼ »ç¿ëÇϵµ·Ï Æ÷µåÀÇ ½º ´ÏÆê ÃßÃâ ¹× ´Ù½Ã Æ÷¸Ë POD :: Snippets´Â ´ÜÀ§ Å×½ºÆ® (¶Ç´Â ´Ù¸¥ Perl ÄÚµå)¿¡¼ »ç¿ëÇϵµ·Ï Æ÷µåÀÇ ½º ´ÏÆêÀ» ÃßÃâÇÏ°í ´Ù½Ã Æ÷¸ËÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù. Synopsis »ç¿ë Pod :: ½º ´ÏÆê; MY $ SNIPS = LOAD POD :: ½º ´ÏÆê ($ FILE_OR_HANDLE, - ¸¶Å© ¾÷ => "Å×½ºÆ®"); ³» $ code_snippet = $ snips-> ( "synopsis") -> as_code; # ... ¾Æ¸¶µµ Borg $ code_snippetÀÌÀÖ´Â regexes ¶Ç´Â ¹º°¡ ... ³» $ result = eval $ code_snippet; $ @ @ ÀÎ °æ¿ì $ @; ($ result-> what_happen (), qr / bomb /); ¿ì¸®°¡ ½º ´ÏÆêÀ» ÃßÃâÇÏ·Á´Â Perl ÄÚµå´Â ´ÙÀ½°ú °°ÀÌ º¸ÀÏ °ÍÀÔ´Ï´Ù : ÆÐÅ°Áö Á¦·Î :: ³¯°³; = head1 À̸§ 0 :: wing - ÈǸ¢ÇÑ Á¤ÀǸ¦ À§ÇØ! = HEAD1 ½Ã³ñ½Ã½º = Å×½ºÆ® ¿ë "½Ã³ñ½Ã½º"½ÃÀÛ 0 :: WIND; My $ Capitain = 0 :: Wing-> ĸ Ƽ³×. = Å×½ºÆ® ¿ë "½Ã³ñ½Ã½º"END = CUT # ... 1;ÀÌ Å¬·¡½º´Â PERL Äڵ忡¼ Æ÷µå ½º ´ÏÆêÀ» ÃßÃâÇÏ´Â POD :: ÆļÀÇ ¸Å¿ì °£´ÜÇÑ È®ÀåÀÚÀ̸ç, ´Ù¸¥ Perl Äڵ忡¼ »ç¿ëÇÒ ¼ö ÀÖµµ·Ï ¿¹»Û ÀμâÇÕ´Ï´Ù. ...¿¡ À§¿¡¼ ¼³¸íÇÑ °Íó·³ POD :: Snipets´Â POD (ÀϹÝÀûÀ¸·Î ½Ã³ñ½Ã½º ¼½¼Ç)¿¡ÀÖ´Â Äڵ带 Æ÷ÇÔÇÏ¿© Å×½ºÆ®ÁßÀÎ ¸ðµç ÆÞ Äڵ带 Å×½ºÆ®ÁßÀÎ ¸ðµç ´ÜÀÏ ¶óÀÎÀ» ³ÖÀ¸·Á´Â Å×½ºÆ®ÁßÀÎ °³¹ß Nutcases¿¡ Áï½Ã À¯¿ëÇÕ´Ï´Ù. ¹®¼ ¹× ÄÚµå¿Í µ¿½Ã¿¡ Àΰ£ ¹× ±â°è Æǵ¶ °¡´É (¿¹ : XML ½ºÅ°¸¶)ÀÌ µ¿½Ã¿¡ ´Ù¸¥ ¿ëµµ°¡ ÀÖ½À´Ï´Ù. ¿ä±¸ »çÇ× : ¡¤ Perl.
Æ÷µå :: ½º ´ÏÆê °ü·Ã ¼ÒÇÁÆ®¿þ¾î