This module provides a Unix-like command `expskip'. 入力ã®ãƒ†ã‚ストをèªã¿å–ã‚Šã€æ•°å€¤ã®éƒ¨åˆ†ã‚’ (Regexp::Commons::number を使ã£ã¦) 抽出ã—ã¦ã€èƒŒæ™¯ã« ANSIエスケープシーケンスã«ã‚ˆã‚‹è‰²ã‚’付ã‘る。 最å°å€¤ã¯é’ã€ç·‘を経由ã—ã¦ã€æœ€å¤§å€¤ã¯èµ¤ã€‚15段階。 (出ç¾æ•°å€¤ã‚’uniq化ã—ãŸä¸Šã§ã€28分ä½ç‚¹ã‚’ã¨ã‚Šã€å¥‡æ•°ç•ªç›®ã®å€¤14個を抽出ã—ã¦ã€ ãれを閾値ã¨ã—ã¦ã€è‰²ã¯æ®µéšŽçš„ã«å¤‰åŒ–ã•ã›ã‚‹ã€‚) Copyright (c) 2021 Toshiyuki SHIMONO. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.