hiroki_kanaのプロフィール

Perlを用いて、XMLファイルの中のキーワードの個数を数えるプログラムを組もうと思っています。 次のようなXMLの中の<keyword>のタグに囲まれた文字列を数えるプログラムです。 <?xml version="1.0" encoding="UTF-8"?> <grant_award_list> <grant_award id="1001"> <title>タイトル1</title> <keywords><keyword>A</keyword><keyword>B</keyword></keywords> </grant_award> <grant_award id="1002"> <title>タイトル2</title> <keywords><keyword>B</keyword></keywords> </grant_award> </grant_award_list> このようなときに、次のようにキーワードとその出現回数が記載されたXMLファイルにしたいと考えています。 <?xml version="1.0" encoding="UTF-8"?> <keywords> <keyword>A</keyword> <count>1</count> </keywords> <keywords> <keyword>B</keyword> <count>2</count> </keywords> 具体的なプログラムのコードを教えてください。よろしくお願いします。