XML::DOMモジュールを使ってXMLをパース XML タイトル１ 作者B 作者C 2004/10/21 Perlコード: の値を取り出す。 use strict; use XML::DOM; my $dom = new XML::DOM::Parser; my $doc = $dom->parsefile('books.xml'); my $nodes_book = $doc->getElementsBy…

SubjectとBodyをISO-2022-JP (JIS)に変換、 プラスSubjectをBase64エンコードしないと文字化けする。 (注) 最近のメーラーのほとんどはUTF-8のメールを認識できる。＊以下のファイルはUTF-8で保存 use strict; use MIME::Base64; use Encode qw(encode); my …