ÆÄÀÏ :: ´ë±â¿­

Persistent FIFO ´ë±â¿­ ¼ø¼öÇÑ Perl¿¡¼­ ±¸ÇöµÇ¾ú½À´Ï´Ù!
Áö±Ý ´Ù¿î·Îµå

ÆÄÀÏ :: ´ë±â¿­ ¼øÀ§ ¹× ¿ä¾à

±¤°í

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

ÆÄÀÏ :: ´ë±â¿­ ű×


ÆÄÀÏ :: ´ë±â¿­ ¼³¸í

Persistent FIFO ´ë±â¿­ ¼ø¼öÇÑ Perl¿¡¼­ ±¸ÇöµÇ¾ú½À´Ï´Ù! ÆÄÀÏ :: ´ë±â¿­Àº ¼ø¼öÇÑ Perl¿¡¼­ ±¸Çö µÈ ¿µ±¸Àû ÀÎ FIFO ´ë±â¿­ÀÔ´Ï´Ù! ½Ã³ñ½Ã½º´Â ¾ö°ÝÇÏ°Ô »ç¿ëÇÕ´Ï´Ù. # ¾ðÁ¦³ª! ÆÄÀÏ :: ´ë±â¿­À» »ç¿ëÇϽʽÿÀ. MY $ Q = »õ ÆÄÀÏ :: ´ë±â¿­ (file => / var / spool / yourprog / queue '); $ Q-> ENQ ( 'ÀϺΠÆò¸é ÅؽºÆ® 1'); $ Q-> ENQ ( 'ÀϺΠÆò¸é text2'); $ Q-> ENQ ( 'ÀϺΠÆò¸é ÅؽºÆ® 3'); # ù ¹ø° 10 ¿ä¼Ò±îÁö ¿Ã¶ó°¡´Â ³» $ contents = $ q-> peek (10); ³» $ ELEM1 = $ Q-> DEQ (); MY $ ELEM2 = $ Q-> DEQ (); # Queue $ q-> reset ()À» ºñ ¿ó´Ï´Ù.ÀÌ ¸ðµâÀº ¿µ±¸Àû ÀÎ FIFO Queue objects.File :: Queue¸¸ÀÌ ½ºÄ®¶ó¸¦ ´ë±â¿­ ¿ä¼Ò·Î ó¸®ÇÕ´Ï´Ù. ÂüÁ¶·Î ÀÏÇÏ°í ½Í´Ù¸é ¸ÕÀú Á÷·ÄÈ­ÇϽʽÿÀ! ¸ðµâÀº ¼Óµµ¸¦ ¿°µÎ¿¡µÎ°í ÀÛ¼ºµÇ¾úÁö¸¸ ¸Å¿ì ºü¸£Áö ¸¸ Ä¡·á¿Í ÇÔ²² »ç¿ëÇؾßÇÕ´Ï´Ù. ÁÖÀÇ »çÇ×À» ÂüÁ¶ÇϽʽÿÀ. ¿ä±¸ »çÇ× : ¡¤ Perl.


ÆÄÀÏ :: ´ë±â¿­ °ü·Ã ¼ÒÇÁÆ®¿þ¾î