Èü :: ´Ü¼ø

Èü :: ´Ü¼øÀº »ç¿ëÇϱ⠽±°í ºü¸¥ Ŭ·¡½Ä ÈüÀ» Æ÷ÇÔÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù.
Áö±Ý ´Ù¿î·Îµå

Èü :: ´Ü¼ø ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Ton Hospel
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~thospel/Tie-Cacher-0.09/Cacher.pm

Èü :: ´Ü¼ø ű×


Èü :: ´Ü¼ø ¼³¸í

Èü :: SimpleÀº »ç¿ëÇϱ⠽±°í ºü¸¥ Ŭ·¡½Ä ÈüÀÌ Æ÷ÇÔ µÈ Perl ¸ðµâÀÔ´Ï´Ù. Èü :: ´Ü¼øÀº »ç¿ëÇϱ⠽±°í ºü¸£°Ô Ŭ·¡½Ä ÇÑ ÈüÀ» Æ÷ÇÔÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù. Synopsis »ç¿ë Èü :: ´Ü¼ø; # Èü »ý¼º My $ heap = heap :: Simple-> New; My $ heap = Èü :: ´Ü¼ø -> »õ·Î ¸¸µé±â (% ¿É¼Ç); # Èü $ heap-> insert (@new_elements)¿¡ µ¥ÀÌÅ͸¦ ³ÖÀ¸½Ê½Ã¿À. # "°´Ã¼"¶Ç´Â "°´Ã¼"¶Ç´Â "key_insert ($ key1, $ element1, $ key2, $ element2, ...)¸¦ °¡Áø"object "¶Ç´Â"any "Èü¿¡ µ¥ÀÌÅ͸¦ ³ÖÀ¸½Ê½Ã¿À. # top °ªÀ» ÃßÃâ $ Element = $ heap-> presure_top; ºó Èü $ Element = $ heap-> refreence_firstÀÇ # croaks; # ºó Èü¿¡¼­ Undef¸¦ ¹ÝȯÇÕ´Ï´Ù. # »óÀ§ °ªÀ» °¡Á® ¿ÀÁö ¸¸ Èü $ Element = $ heap-> top; ºó Èü¿¡ # croaks $ element = $ heap-> ù°; # ºó Èü¿¡¼­ undef¸¦ ¹ÝȯÇÕ´Ï´Ù # Èü $ top_key = $ heap-> top_key; # ºñ¾îÀÖ´Â Èü # Croaks¿¡¼­ ¹«ÇѴ븦 ¹ÝȯÇÕ´Ï´Ù. $ top_key = $ heap-> first_key; # ºó Èü¿¡¼­ undef¸¦ ¹ÝȯÇÕ´Ï´Ù. @elements = $ heap-> extract_upto ($ max_key); # ¸ðµç µ¥ÀÌÅÍ @Element = $ heap-> pression_all; # Èü $ heap-> ¸¼Àº; # ¿ä¼Ò ¼ö¸¦ ã½À´Ï´Ù $ count = $ heap-> count; # ¸ðµç Å° °¡Á® ¿À±â (Á¤·ÄµÇÁö ¾ÊÀ½) @Keys = $ heap-> Å°; # ¸ðµç °ª °¡Á® ¿À±â (Á¤·ÄµÇÁö ¾ÊÀ½) @values = $ heap-> °ª; # $ key = $ heap-> Å° ($ value) °ª¿¡ ÇØ´çÇÏ´Â Å°¸¦ ã½À´Ï´Ù. # get / set user_data $ user_data = $ heap-> user_data; $ old_data = $ heap-> user_data ($ new_data); # Infinity $ Infinity = $ heap-> ¹«ÇÑ´ë; $ old_infinity = $ heap-> ¹«ÇÑ´ë ($ new_data); # element¿¡¼­ Å°ÀÇ À§Ä¡¸¦ ¾òÀ¸½Ê½Ã¿À $ key_index = $ heap-> key_index; $ key_name = $ heap-> key_name; $ key_method = $ heap-> key_method; $ key_function = $ heap-> key_function; # »õ·Î¿î °ÍÀ¸·Î ¼³Á¤µÈ ¿©·¯ °¡Áö Ç׸ñÀÇ °ªÀ» ¹ÝȯÇÕ´Ï´Ù : $ wrapped = $ heap-> Æ÷Àå; $ max_count = $ heap-> max_count; $ can_die = $ heap-> can_die; $ dirty = $ heap-> ´õ·¯¿î; $ ÁÖ¹® = $ heap-> ÁÖ¹®; @Elements = $ heap-> ¿ä¼Ò; $ remorts = $ heap-> ¿ä¼Ò; # @heapsÀÇ °¢ Èü¿¡¼­ ¸ðµç ¿ä¼Ò¸¦ ¿Å±â°í $ Èü $ heap-> advelb (@Heaps); # ¹Ýº¹µÇ´Â $ heap-> $ heap-> key_absorb »ðÀÔ (@Heaps); # ¹Ýº¹µÇ´Â $ heap-> key_insert # ÀÌ¹Ì Á¤·Ä µÈ ¹è¿­À» »õ Á¤·Ä µÈ ¹è¿­ #¿¡ º´ÇÕÇÏ´Â °Íó·³ ÀÌ¹Ì $ metged_aref = $ heap-> merge_arrays ($ aref1, $ aref2, ..); # ½ÇÁ¦ ÀÛ¾÷Àº ¾î¶² Ŭ·¡½ºÀԴϱî? $ ±¸Çö = heap :: simple-> ±¸Çö; example¿¡¼­ Å°¿Í °ªÀº º°µµ·Î À¯ÁöµË´Ï´Ù. Èü :: ´Ü¼øÀ» »ç¿ëÇϽʽÿÀ; MY $ heap = Èü :: ´Ü¼ø -> »õ (¿ä¼Ò => "any"); $ heap-> key_insert (8, "¹Ù"); $ heap-> key_insert (5, "foo"); # ÀÌ°ÍÀº foo°¡ ÀμâµË´Ï´Ù (5´Â °¡Àå ³·Àº Å°ÀÔ´Ï´Ù) Àμâ "ù ¹ø° °ªÀº", $ heap-> presure_top, "n"; $ heap-> key_insert (7, "baz"); # ÀÌ°ÍÀº BAZ (7ÀÌ °¡Àå ³·Àº Å°) Àμâ "´ÙÀ½ °ª", $ heap-> presual_top, "n"ÀÔ´Ï´Ù. # ÀÌ°ÍÀº Àμ⠸·´ë (8 ÀÌÁ¦ °¡Àå ³·Àº Å°°¡ ÀÖ½À´Ï´Ù) Àμâ "´ÙÀ½ °ªÀº", $ heap-> presual_top, "n"ÀÔ´Ï´Ù. ¿ä±¸ »çÇ× : ¡¤ Perl.


Èü :: ´Ü¼ø °ü·Ã ¼ÒÇÁÆ®¿þ¾î