{"categories":["Perl/CGI"],"url":"https://likk.hatenablog.com/entry/20051118/1132304870","author_name":"likk","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Flikk.hatenablog.com%2Fentry%2F20051118%2F1132304870\" title=\"\u6587\u5b57\u5217\u3069\u3082\u3092\u3076\u3063\u305f\u5207\u308b\u3000\u305d\u306e2 - NeverBlog::Likk::Unexistable;\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","image_url":null,"provider_name":"Hatena Blog","description":"\u524d\u56dePerl\u306e\u30d0\u30fc\u30b8\u30e7\u30f3\u304c5.6\u3060\u3063\u305f\u305f\u3081 \u52d5\u304b\u306a\u304b\u3063\u305f\u90e8\u5206\u3092 $cutting =~ s/(\\p{Hiragana}|\\p{Katakana})(\\p{Han}|[A-Za-z0-9_])/$1,$2/g; $cutting =~ s/(\\p{Hiragana})(\\p{Katakana})/$1,$2/g;\u3092\u4fee\u6b63\u3057\u3066$cutting = jcode($cutting)->euc; $cutting =~ s/*1*2/$1,$2/g; $cutting =~ s/(\\xA4[\\x00-\\xFF]|\\xA1\\xBC)(\\xA5[\\x00-\\xFF]|\\xA1\\xBC)/$1,$2/g; $c\u2026","blog_title":"NeverBlog::Likk::Unexistable;","provider_url":"https://hatena.blog","published":"2005-11-18 18:07:50","author_url":"https://blog.hatena.ne.jp/likk/","width":"100%","type":"rich","blog_url":"https://likk.hatenablog.com/","title":"\u6587\u5b57\u5217\u3069\u3082\u3092\u3076\u3063\u305f\u5207\u308b\u3000\u305d\u306e2","height":"190","version":"1.0"}