Ŭ·¡½º :: ³ª¹«

µð·ºÅ丮 Æ®¸® ¹× C ++ Ŭ·¡½º¿Í °°Àº °èÃþ Àû Á¤º¸¸¦ ÀÛ¼ºÇÏ°í ÀμâÇϽʽÿÀ.
Áö±Ý ´Ù¿î·Îµå

Ŭ·¡½º :: ³ª¹« ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Ron Savage
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~rsavage/

Ŭ·¡½º :: ³ª¹« ű×


Ŭ·¡½º :: ³ª¹« ¼³¸í

µð·ºÅ丮 Æ®¸® ¹× C ++ Ŭ·¡½º¿Í °°Àº °èÃþ Àû Á¤º¸¸¦ ÀÛ¼ºÇÏ°í ÀμâÇϽʽÿÀ. Ŭ·¡½º :: Æ®¸®´Â µð·ºÅ丮 Æ®¸® ¹× C ++ Ŭ·¡½º¿Í °°Àº °èÃþ Àû Á¤º¸¸¦ ºôµåÇÏ°í ÀμâÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù .Synopsis Ŭ·¡½º :: Æ®¸®¸¦ »ç¿ëÇÕ´Ï´Ù. # ¶Ç´Â ... # Ŭ·¡½º :: Æ®¸® QW ($ ·çÆ®); # 1. µð·ºÅ丮 Æ®¸®. ³» ($ dir1) = 'somedir / somesubdir'; MY ($ tree1) = »õ Ŭ·¡½º :: ³ª¹«; $ tree1 -> builddirtree ($ dir1, ; $ tree1 -> writeTree (); # 2. C ++ Ŭ·¡½º Æ®¸®. CWD¸¦ »ç¿ëÇϽʽÿÀ; MY ($ currentDir) = cwd (); ³» ($ dir2) = 'somedir / somesubdir'; # * .h¸¦ Æ÷ÇÔÇÕ´Ï´Ù. T / Family.h¸¦ ÂüÁ¶ÇϽʽÿÀ. MY ($ Origin) = 'root'; MY ($ tree2) = »õ Ŭ·¡½º :: ³ª¹«; $ tree2 -> buildclasstree ($ dir2, $ ¿øº», $ currentdir); "Ŭ·¡½º Æ®¸®¸¦ ÀμâÇϽʽÿÀ --------------- "; $ tree2 -> writeTree (); Àμâ" "Àμâ"Ŭ·¡½º ¸ñ·Ï --------------- "; $ tree2 -> writeclasslist (); ¿ä±¸ »çÇ× : ¡¤ Perl.


Ŭ·¡½º :: ³ª¹« °ü·Ã ¼ÒÇÁÆ®¿þ¾î