>>676 Perl5
仮名を清音に変換してから比較する
https://ideone.com/bzxwnp