Sort :: Half :: Maker.

Á¤·Ä :: Half :: Maker´Â ¹Ý Á¤·Ä Àá¼öÁ¤À» ½±°Ô ¸¸µé ¼öÀÖ´Â Perl ¸ðµâÀÔ´Ï´Ù.
Áö±Ý ´Ù¿î·Îµå

Sort :: Half :: Maker. ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Adriano R. Ferreira
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~ferreira/Acme-Note-0.5/lib/Acme/Note.pm

Sort :: Half :: Maker. ű×


Sort :: Half :: Maker. ¼³¸í

Á¤·Ä :: Half :: Maker´Â ¹Ý Á¤·Ä Àá¼öÁ¤À» ½±°Ô ¸¸µé ¼öÀÖ´Â Perl ¸ðµâÀÔ´Ï´Ù. Á¤·Ä :: Half :: Maker´Â ¹Ý Á¤·Ä ÇÏÀ§ Á¶Á¤À» ½±°Ô ¸¸µé ¼öÀÖ´Â Perl ¸ðµâÀÔ´Ï´Ù. Synopsis Á¤·Ä :: Half :: Maker QW (make_halfsort); $ sub = make_halfsort (start => , end => , fallback => sub {$ _ cmp $ _ }); @List = $ sub qw Á¤·Ä (a f h w z b t x); # qw (x y z f h t w a b) ¹ÝÂë Á¤·ÄµÇ±â Àü¿¡? ¹Ý Á¤·ÄÀº ½ÃÀÛ ¸ñ·Ï, Á¾·á ¸ñ·Ï ¹× ÀÏ¹Ý Á¤·Ä ¼­ºê ·çƾÀ¸·Î Á¤ÀÇ µÈ Á¤·Ä ¼­ºê ·çƾÀÔ´Ï´Ù. ½ÃÀÛ ¸ñ·ÏÀÇ ¿ä¼Ò´Â Ç×»ó ´Ù¸¥ »ç¶÷µé°ú ºñ±³ÇÏ¿© ¸ÕÀú À̵¿ÇÏ¿© ¿ø·¡ÀÇ ÁÖ¹®À» À¯ÁöÇÕ´Ï´Ù. ³¡³ª´Â ¸ñ·ÏÀÇ ¿ä¼Ò´Â Ç×»ó ´Ù¸¥ »ç¶÷µé°ú ºñ±³ÇÏ¿© Ç×»ó Áö¼ÓµÇ¸ç ¿ø·¡ÀÇ ¸í·ÉÀ» À¯ÁöÇÕ´Ï´Ù. ³ª¸ÓÁö ¿ä¼Ò´Â ÁÖ¾îÁø ÀÏ¹Ý Á¤·Ä ¼­ºê ·çƾÀ» ÅëÇØ Á¤·ÄµË´Ï´Ù. ¿¹Á¦´Â QW (À̸§ ¹öÀü Ãß»ó ¶óÀ̼¾½º ÀÛ¼ºÀÚ)°¡ ù ¹ø°¿Í qw (¸ÞŸ - »ç¾ç)Àº ´ë¼Ò ¹®ÀÚ¸¦ ±¸ºÐÇÏÁö ¾Ê´Â ºñ±³¸¦ »ç¿ëÇÏ¿© ¸¶Áö¸·À¸·Î ³ª¿Â´Ù. ÀÌ ¸ðµâÀ» »ç¿ëÇϸé ÀÌ·¸°Ô ¼öÇàµË´Ï´Ù : $ sub = make_halfsort (start => , end => , fallback => sub {lc $ _ ] CMP LC $ _ }); my @pairs = map {($ _, $ h {$ _})} $ sub Å°¸¦ Á¤·ÄÇϽʽÿÀ (% h); ¿Ö ±×°ÍÀÌ ÁÁÀº°¡? ³ª´Â ±×°Í¿¡ ´ëÇØ ¸¹Àº ¿ëµµ°¡ º¸ÀÌÁö ¾Ê´Â´Ù. ³ª´Â Extutils :: MakemakerÀÇ Meta.yml »ý¼ºÀ» Çâ»ó½ÃÅ°±â À§ÇØ ÆÐÄ¡¸¦ ÀÛ¼ºÇÏ´Â µ¿¾È °³³äÀ¸·Î ¿¬ÁÖÇß½À´Ï´Ù. ¿ì¸®´Â ¾Õ¿¡¼­ Å°¸¦ ´ýÇÁ ÇÑ ´ÙÀ½ ¸ðµâ ÀÛ¼ºÀÚ°¡ Ãß°¡ Á¤º¸·Î Á¦°øµÇ´Â ¸ðµâ ÀÛ¼ºÀÚ¸¦ ÀÌÀü¿¡ ´ýÇÁÇÏ°í ¸ðµâ ÀÛ¼ºÀÚ¸¦ ´ýÇÎÇÏ°í ½Í¾ú½À´Ï´Ù .functionsmake_halfsort $ sub = make_halfsort (start => @start_list, end => @end_list, fallback => sort_sub); @sorted = sort $ sub @unsorted; Á¤·Ä°ú ÇÔ²² »ç¿ëÇÒ ¼öÀÖ´Â Á¤·Ä ¼­ºê ·çƾÀ» ºôµåÇÕ´Ï´Ù. @start_list¿¡ Æ÷ÇÔ µÈ ¿ä¼Ò ÀÎ @start_list¿Í ³²Àº ¿ä¼Ò¿¡ Æ÷ÇÔ µÈ ¿ä¼ÒÀÇ ¼¼ °³ÀÇ ÆÄƼ¼ÇÀ¸·Î ºÐ·ù µÈ ¸ñ·ÏÀ» (°¡´É¼º) ºÐÇÒÇÕ´Ï´Ù. @start_list ¹× @end_listÀÇ ¿ä¼ÒÀÇ °æ¿ì ¸ñ·Ï ¼ø¼­°¡ À¯ÁöµË´Ï´Ù. ³ª¸ÓÁö Ç׸ñÀÇ °æ¿ì ÁÖ¾îÁø Á¤·Ä ¼­ºê (¶Ç´Â ±âº»°ª)°¡ Àͼ÷ÇØÁý´Ï´Ù. Æú¹éÀÌ eMbitedÀ̸é, ±âº»°ªÀº Sort Sub Sub ($$) {$ _ cmp $ _ }À» »ç¿ëÇÕ´Ï´Ù. ½ÃÀÛ ¶Ç´Â ³¡ÀÌ ´öºÐ ÀÏ ¼ö ÀÖ½À´Ï´Ù. ±×·¯³ª µÑ ´Ù »ý·«Çϸé half-sort.requirements ¾øÀÌ´Â ÇØ°áÇÒ ¼öÀÖ¾ú½À´Ï´Ù. ¡¤ Perl


Sort :: Half :: Maker. °ü·Ã ¼ÒÇÁÆ®¿þ¾î