holidays-l https://blog.hatena.ne.jp/holidays-l/ ヒルズで働く@robarioの技ログ https://holidays-l.hatenadiary.org/ Perl エントリーを書いてる途中に解決しましたがメモっておきます。 use XML::Simple; use Data::Dumper; my $xml = <<'XML'; <a> <b> <c> <d> </d> </c> </b> </a> XML $\ = "\n"; print $xml; my $obj = XMLin($xml); # XMLを入力して print Dumper($obj); # 中身を確認し、 print XMLout( $obj, NoAttr => 1, RootName => 'a' ); # XMLとして出力してみる を実行してみると、 <a> <b> <c> … 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fholidays-l.hatenadiary.org%2Fentry%2F20060704%2Fp1" title="XML::Simple#XMLoutで元のXMLに戻らない問題→解決 - ヒルズで働く@robarioの技ログ" 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 2006-07-04 00:00:01 rich https://holidays-l.hatenadiary.org/entry/20060704/p1 1.0 100%