#!/usr/bin/perl # vcfの # FN: "管 直人 様" の様をとりさる # N: "管;直人;;;様" の様をとりさる # X-PHONETIC-LAST-NAME: が半角文字だったら全角ひらがなにする\ # Unicode::Japaneseのインストールが必要；see http://ugawalab.miyakyo-u.ac.jp/m6/fuku…