{"type":"rich","blog_url":"https://ktat.hatenadiary.jp/","author_name":"ktat","provider_name":"Hatena Blog","image_url":null,"html":"<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>","version":"1.0","description":"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","blog_title":"Practice of Programming","published":"2010-04-03 00:02:05","url":"https://ktat.hatenadiary.jp/entry/20100403/1270306925","height":"190","width":"100%","provider_url":"https://hatena.blog","categories":["Perl"],"title":"Util::Any 0.19 ","author_url":"https://blog.hatena.ne.jp/ktat/"}