今まさにDBD::mysqlのPerlで頭を抱えている小岩です。

> すると、凡例には hoge と fuga が出ず、 h と o と g と e
> が出ます。（笑）
> 
> これを hoge と fuga にするにはどうすればいいのでしょうか？
> もう、既に３時間も悩んでます。つかれたー(T_T)

元データのhogeとfugaの間がスペースなのかタブなのかわかりませんが、
    @hanrei = split(//, $line);
のところをスペ−ス区切りなら
    @hanrei = split(' ', $line);
タブ区切りなら
    @hanrei = split('\t', $line);
とすればいいだけじゃないでしょうか。