Optimization of sort() - Islands in the byte stream (legacy)Perlã®æœ€é©åŒ–器ã¯ã‹ãªã‚Šé ‘å¼µã£ã¦sort()ã®æœ€é©åŒ–を試ã¿ã¦ã„る。具体的ã«ã¯ï¼Œé…列をãã®å ´ã§ç›´æŽ¥ã‚½ãƒ¼ãƒˆã™ã‚‹å ´åˆï¼Œæ•°å€¤ã¾ãŸã¯æ•´æ•°ã§ã‚½ãƒ¼ãƒˆã™ã‚‹å ´åˆï¼Œã‚½ãƒ¼ãƒˆãƒ–ãƒãƒƒã‚¯ã®$aã¨$bã‚’å˜ç´”ã«å…¥ã‚Œæ›¿ãˆãŸå ´åˆã«ãŠã„ã¦ï¼Œæœ€é©åŒ–ã•ã‚ŒãŸé«˜é€Ÿãªãƒãƒ¼ã‚¸ãƒ§ãƒ³ãŒä½¿ã‚れる。 以下ã¯ã™ã¹ã¦5.10.0ã§ç¢ºèªã—ãŸã€‚ é…列を直接ソートã™ã‚‹å ´åˆ ソート後ã®ãƒªã‚¹ãƒˆã‚’å…ƒã®é…列ã«ä»£å…¥ã™ã‚‹ã‚±ãƒ¼ã‚¹(ãŸã¨ãˆã°"@array = sort @array")ã§ã¯ï¼Œsort()ã«æ¸¡ã•ã‚ŒãŸé…列を直接並ã³æ›¿ãˆã‚‹ãŸã‚，メモリã¨é€Ÿåº¦ã®ä¸¡æ–¹ã§å‹ã‚‹ã€‚ 確èªã‚³ãƒ¼ãƒ‰ï¼š $ perl -MO=Concise,-exec -e '@a=sort@a' # ... 7 <@> sort lK/INPLACE # ... ソートオペレータã«ãŠã‘る「INPLACEã€ã¨ã„ã†ãƒ•ãƒ©ã‚°ãŒã“ã®æœ€é©åŒ–ã®è¡¨ã‚Œã§ã‚る。 数値ã§ã‚½ãƒ¼ãƒˆã™ã‚‹å ´åˆ ソートブãƒãƒƒã‚¯ã§ã®æ•°å€¤ã«ã‚ˆã‚‹æ¯”較(ãŸã¨ãˆã°"
人æç²å¾—作戦・４　試験å•é¡Œã»ã‹ - 人生を書ãæ›ãˆã‚‹è€…ã™ã‚‰ã„ãŸã€‚
{{#tags}}- {{label}}
{{/tags}}