| ½º·¹µå :: Queue :: ¸ð´ÏÅ͸µ ƯÁ¤ ÄÜÅÙÃ÷¿¡ ´ëÇÑ ´ë±â¿ ¸ð´ÏÅ͸µ |
Áö±Ý ´Ù¿î·Îµå |
½º·¹µå :: Queue :: ¸ð´ÏÅ͸µ ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Elizabeth Mattijsen
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~elizabeth/
½º·¹µå :: Queue :: ¸ð´ÏÅ͸µ ű×
½º·¹µå :: Queue :: ¸ð´ÏÅ͸µ ¼³¸í
½º·¹µå :: Queue :: Monitored´Â ½º·¹µå :: Queue :: Monitored°¡ ±¸Çö µÈ ½º·¹µå ¾ÈÀü µ¥ÀÌÅÍ ±¸Á¶·Î ±¸Çö µÈ "Æ÷Å©"¸ðµâÀÌ ¼³Ä¡µÈ "Æ÷Å©"¸ðµâÀÌ ¼³Ä¡µÈ "Æ÷Å©"¸ðµâÀÌÀÖ´Â Queue¿Í ÇÔ²² ÇÔ¼ö ¸¸ÀÖ´Â Perl ¸ðµâÀÔ´Ï´Ù. ½º·¹µå :: ´ë±â¿¿¡¼ »ó¼ÓÇÕ´Ï´Ù. ±×·¯³ª Ç¥ÁØ ½º·¹µå :: ´ë±â¿°ú ´Þ¸®, Å¥ÀÇ »õ·Î¿î °ªÀ» »ç¿ëÇÒ ¼öÀÖ°ÔÇؼ Å¥ÀÇ ³»¿ëÀ» ¸ð´ÏÅÍÇÏ´Â ´ÜÀÏ ½º·¹µå¸¦ ½ÃÀÛÇÕ´Ï´Ù. Å¥¿¡ ¹èÄ¡ µÈ ÀÛ¾÷À» ±â·ÏÇÏ´Â µ¥ »ç¿ëÇÒ ¼ö ÀÖ½À´Ï´Ù. ƯÁ¤ °ªÀÌ ¹ß»ýÇϸé Ãâ·Â °æ°í ¸¸ Ãâ·ÂµË´Ï´Ù. ¶Ç´Â ½º·¹µå¿¡¼ ¼öÇà µÈ ÀÛ¾÷Àº ¼ºê ·çƾ¿¡ ´ëÇÑ À̸§ ¶Ç´Â ÂüÁ¶·Î °áÁ¤µË´Ï´Ù. ÀÌ ¼ºê ·çƾÀº ´ë±â¿¿¡¼ ¾òÀº ¸ðµç °ª¿¡ ´ëÇØ È£ÃâµË´Ï´Ù. ½º·¹µå ¼ö´Â List.Snopsis »ç¿ë ½º·¹µå :: Queue :: Monitor¸¦ »ç¿ëÇÕ´Ï´Ù. My ($ q, $ t) = ½º·¹µå :: queue :: monitored-> new ({monitor => sub {print "monitoring value $ _ \ n"}, #Àº Çʼö => sub {print "Monitoring \ n"}, # ¼±ÅÃÀû Post => Sub {Print "Stop Monitoring Stop Monitoring \ n"}, # ¼±ÅÃÀû Å¥ => $ ´ë±â¿, # ±âÁ¸ ´ë±â¿À» »ç¿ëÇÏ°í, ÁöÁ¤µÇÁö ¾ÊÀº °æ¿ì »õ·Î ¸¸µé±â => 'Á¾·á', # ±âº»°ªÀº Undef}); $ Q-> enqueue ( "foo"); $ q-> enqueue (Undef); # ±âº»ÀûÀ¸·Î ±âº»°ª @ post = $ t-> °¡ÀÔ; # ¼±ÅÃÀû, ¸ð´ÏÅÍ ½º·¹µå°¡ $ queue = ½º·¹µå·Î ´ë±â = ½º·¹µå :: queue :: ¸ð´ÏÅ͸µ µÈ -> ÀÚ¾Æ; # "pre", "do", "Post"OnlyProductÀÇ È¨ÆäÀÌÁö
½º·¹µå :: Queue :: ¸ð´ÏÅ͸µ °ü·Ã ¼ÒÇÁÆ®¿þ¾î