{"height":"190","type":"rich","provider_name":"Hatena Blog","version":"1.0","published":"2006-06-07 10:49:06","blog_title":"yoshifumi1975's diary","author_url":"https://blog.hatena.ne.jp/yoshifumi1975/","author_name":"yoshifumi1975","description":"@array = (1, 3, 5); # \u914d\u5217 $ref = [1, 3, 5]; # \u914d\u5217\u306e\u53c2\u7167 @array == @{$ref} == @$ref; # \u5168\u90e8\u7b49\u3057\u3044 \\@array \u3068 $ref \u306f\u3001\u5024\u306f\u540c\u3058\u3002 \u30c7\u30d0\u30c3\u30b0\u7528 use Data::Dumper; print Dumper( @array ); perl -d \u306ex\u30b3\u30de\u30f3\u30c9\u76f8\u5f53 \u30c7\u30fc\u30bf\u306e\u6c38\u7d9a\u5316 use Storable; store [\\@array, $ref], 'test.db'; my ($arrayref1, $arrayref2) = retrieve('test.db'); print Dumper( @{$a\u2026","provider_url":"https://hatena.blog","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fyoshifumi.hateblo.jp%2Fentry%2F20060607%2F1149644946\" title=\" Perl\u30e1\u30e2 - yoshifumi1975&#39;s diary\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","title":" Perl\u30e1\u30e2","image_url":null,"width":"100%","url":"https://yoshifumi.hateblo.jp/entry/20060607/1149644946","categories":["Perl"],"blog_url":"https://yoshifumi.hateblo.jp/"}