¾îÈÖ

ÇöÀç '³»'º¯¼öÀÇ Çؽø¦ ¾òÀ¸½Ê½Ã¿À.
Áö±Ý ´Ù¿î·Îµå

¾îÈÖ ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °Ô½ÃÀÚ À̸§:
  • Ingy d%uFFFDt Net
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~ingy/

¾îÈÖ Å±×


¾îÈÖ ¼³¸í

ÇöÀç '³ªÀÇ'º¯¼öÀÇ Çؽø¦ ¾òÀ¸½Ê½Ã¿À. ÆÄÀ̽ãÀº À̸§ / °ª ¸ÅÇο¡¼­ ¾îÈÖ Àû ¹üÀ§ º¯¼ö¸¦ ¹ÝȯÇÏ´Â`locals ()`locals ()`¶ó´Â ³»Àå ÇÔ¼ö¸¦ °¡Áö°í ÀÖ½À´Ï´Ù. ÀÌ°ÍÀº ¸Å¿ì À¯¿ëÇÑ °ü¿ë±¸ÀÔ´Ï´Ù. ´ÙÀ½°ú °°ÀÌ Çؽø¦ ¸¸µé ÇÊ¿ä°¡ÀÖ´Â ´ë½Å : My $ hash = {foo => $ foo, bar => $ bar,}; My $ hash = ¾îÈÖ; $ foo¿Í $ bar°¡ Á¤ÀÇÇÑ °¡Á¤, ´ç½ÅÀº µ¿ÀÏÇÑ ÀÏÀ» ¾òÀ¸½Ê½Ã¿À. lexicals`¶ó´Â ±â´ÉÀ» ³»º¸³»´Â Perl ¸ðµâÀÔ´Ï´Ù. ÀÌ ÇÔ¼ö´Â ¾îÈÖ¸¦ Çؽà ÂüÁ¶·Î ¹ÝȯÇÕ´Ï´Ù (½ºÄ®¶ó ¶Ç´Â ¸ñ·Ï ÄÁÅؽºÆ®¿¡¼­) .Synopsis ÅÛÇø´ :: Toolkit :: Simple; ¾îÈÖ¸¦ »ç¿ëÇϽʽÿÀ; Sub Mail {My $ self = shift; ³» $ name = '¾¾. ' $ self-> get_name; ³» $ INDERS = $ self-> fetch_address ($ name); MY $ STAPP = ¿ìÇ¥ :: ½ºÅÆÇÁ -> »õ·Î¿î (0.44); ³» $ Envelope = TT-> ·»´õ¸µ ( 'ºÀÅõ', ¾îÈÖ); } ¿ä±¸ »çÇ× : ¡¤ Perl.


¾îÈÖ °ü·Ã ¼ÒÇÁÆ®¿þ¾î