{"categories":[],"provider_name":"Hatena Blog","type":"rich","width":"100%","height":"190","image_url":null,"description":"\"Perl Best Practices\" \u8aad\u3093\u3067\u77e5\u3063\u305f Data::Alias \u3068\u6700\u8fd1(\u3088\u3046\u3084\u3063\u3068)\u6c17\u304c\u3064\u3044\u305f values \u306e\u672c\u6765\u306e\u4f7f\u308f\u308c\u65b9\u3002 #!/usr/local/bin/perl use strict; use warnings; my %city = ( Japan => 'Tokyo', Korea => 'Seoul', UK => 'London', ); foreach my $value ( values %city ) { $value .= ' is capital of '; } foreach my $key ( keys %city ) { printf \"%\u2026","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fshag.hatenadiary.org%2Fentry%2F20060206\" title=\"values and Data::Alias - shag \u306e\u65e5\u8a18\" 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","author_url":"https://blog.hatena.ne.jp/shag/","blog_title":"shag \u306e\u65e5\u8a18","published":"2006-02-06 00:00:00","title":"values and Data::Alias","provider_url":"https://hatena.blog","author_name":"shag","blog_url":"https://shag.hatenadiary.org/","url":"https://shag.hatenadiary.org/entry/20060206"}