MecabとPerlを無理やり使った漢字の読み取得

本来はMecabのPerlバインディングとかを使ってスマートにやるべきなんだろうけど、手っ取り早く結果を得るための無理矢理版
まじめにやる場合は、http://mecab.sourceforgh.net/bindings.htmlを参照のこと

|perl|
foreach $addr () {
chomp($addr);
print echo $addr | mecab -Oyomi;
}

DATA
ご飯
醤油
邪道

||<