結果です。

まず、use Encode qw(from_to);での結果。
from_to($huga, 'cp932', 'eucjpms');
ダメでした。
髙ⅱ鄧⑯㊧Ⅱと続けて記入したデータが??????に化けました。

次にEncode::EUCJPMSを読み込ませた上で
↓のように記述してみました。
from_to($huga, 'cp932', 'eucjpms');
これもダメでした。髙ⅱ鄧が全角空白に変換され　　　⑯㊧Ⅱと出力されてしまいました。

３、のuse utf8は時間が掛かるので明日にでも全改修してやってみます。