ktat https://blog.hatena.ne.jp/ktat/ Practice of Programming https://ktat.hatenadiary.jp/ Perl I've released new version Util::Any 0.19. List::Pairwise functions are included in -list. use Util::Any -list; my @n = (1,2,3,4,5,6,7,8,9,10); mapp {$a *= 10; $b /= 2} @n; print "@n"; # 10 1 30 2 50 3 70 4 90 5 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fktat.hatenadiary.jp%2Fentry%2F20100403%2F1270306925" title="Util::Any 0.19 - Practice of Programming" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2010-04-03 00:02:05 rich https://ktat.hatenadiary.jp/entry/20100403/1270306925 1.0 100%