== ¼Ò°³ == CTAN:macros/latex/contrib/perltex/ Perl Äڵ带 °¡Áö°í LaTeX ¸ÅÅ©·Î¸¦ Á¤ÀÇÇØ ½á¸Ô´Â Àç¹ÌÀÖ´Â ÆÐÅ°ÁöÀÌ´Ù. Perl ¸ÅÅ©·Î°¡ LaTeX ¸ÅÅ©·Î·Î µÇ´Â °ÍÀÌ´Ù. À̷νá LaTeXÀÇ Á¶ÆÇ ´É·Â°ú PerlÀÇ ÇÁ·Î±×·¡¹Ö ´É·ÂÀ» °áÇÕÇÒ ¼ö ÀÖ°Ô µÈ´Ù. == »ç¿ë¹ý == ÇÁ¸®¾Úºí¿¡ `\usepackage{perltex}`¶ó°í ¼±¾ðÇÑ´Ù. ÀÌÁ¦ `\perlnewcommand`, `\perlrenewcommand`, `\perlnewenvironment`, `\perlrenewenvironment`ÀÇ ³×°¡Áö ¸í·ÉÀ» ÀÌ¿ëÇÒ ¼ö ÀÖ´Ù. ¹®¼­ÄÄÆÄÀÏÀº `perltex.pl`À̶ó´Â ½ºÅ©¸³Æ®¸¦ »ç¿ëÇÑ´Ù. ¿É¼ÇÀº ´ÙÀ½°ú °°´Ù. {{{ --latex=program ±âº»°ªÀÎ latex ´ë½Å ´Ù¸¥ ½ÇÇà¸í·É(¿¹:pdflatex)À» ÁÙ ¼ö ÀÖ´Ù. --nosafe ±âº»°ªÀ¸·Î À§ÇèÇÑ PerlÄÚµå(¿¹: ÆÄÀÏ»èÁ¦)°¡ ½ÇÇàµÇÁö ¾Êµµ·Ï µÇ¾î Àִµ¥ ÀÌ ¿É¼ÇÀº ¾ÈÀüÀåÄ¡¸¦ Ç®¾îÁØ´Ù. ¸ðµç Perl Äڵ尡 ±×´ë·Î ½ÇÇàµÈ´Ù. --permit=feature ƯÁ¤ PerlÄڵ常À» ¾ÈÀüÀåÄ¡·ÎºÎÅÍ ÇØÁ¦ÇÑ´Ù. ¿©·¯¹ø ¿É¼ÇÀ» ÁÙ ¼ö ÀÖ´Ù. }}} == º¸±â1: ÇÑ±Û Sorting ¿¹Á¦ == TeXÀ¸·Î´Â ¹®ÀÚ¿­À» ¼ÒÆÃÇÏ´Â Äڵ带 Â¥±â°¡ ½±Áö¾Ê´Ù. PerlTeX¿¡°Ô ÀÌ·± °ÍÀº ½ÄÀº Á× ¸Ô±âº¸´Ù ½±´Ù. test.tex: {{{ \documentclass[a4paper]{article} \usepackage{perltex} \usepackage{dhhangul} \perlnewcommand{\sortarg}[1]{join ',', sort split ',', $_[0]} \newcommand{\teststring}{ÇѱÛ,°¡³ª´Ù,¿ì¸®³ª¶ó,´ëÇѹα¹} \begin{document} \begin{center} \teststring\\ $\Downarrow$\\ \sortarg{\teststring} \end{center} \end{document} }}} PerlTeXÀº TeX ¸ÅÅ©·Î¸¦ ¸¸³ª¸é À̸¦ È®Àå(expand)ÇÑ ÈÄ Perl·Î ó¸®ÇÑ´Ù. È®ÀåÀ» ¸øÇÏ°Ô ÇÏ·Á¸é `\noexpand`¸¦ TeX ¸ÅÅ©·Î ¾Õ¿¡ ºÙÀÌ¸é µÈ´Ù. ÄÄÆÄÀÏ: {{{ $ perltex.pl --latex=lambda --nosafe test.tex }}} ±× °á°ú: Uploads:perltexsortexample.png ¿Í~ º¸±â¸¸ Çصµ ½Å³³´Ï´Ù. :D --[Progress] == º¸±â2: DB¿Í ¿¬µ¿ÇÑ List Plot ±×¸®±â == º» ¿¹Á¦´Â DB(MySQL ¶Ç´Â MSSQL)¿¡ ÀúÀåµÇ¾î ÀÖ´Â ¼öÄ¡ µ¥ÀÌÅ͸¦ Perl·Î ÃßÃâÇÏ¿© À̸¦ PSTricks¸¦ ÀÌ¿ëÇÏ¿© List plotÀ» ±×¸®´Â ¿¹Á¦ÀÌ´Ù. ¿©±â¼­ ¿ì¸®°¡ ¿øÇÏ´Â °ÍÀº List plot¿¡¼­ Àüü Æò±Õ°ú ÃÖ´ë°ª, ÃÖ¼Ò°ªÀ» perl·Î »êÃâÇÏ¿© À̸¦ ¹Ù·Î TeXÀ¸·Î Ãâ·ÂÇÏ´Â ±â´ÉÀ» ÁÖ´Â °ÍÀÌ´Ù.