>>494
これだけたくさん、大勢の人がキミのためにレスつけてくれてるのに
読んでないだろ？

いいか、話をまとめるとだな、
全角の空白は
2020 (JISコード)
A1A1 (EUCコード)
8140 (Shift-JIS コード) ←問題あり
このうち、Shift-JIS の後半の 40 が ASCIIコードの @ とかぶる。
print "　a\n"; は、
print "\x81@a\n"; と書くのと同じ。
@a が配列と解釈されてしまう。それでエラーが出てるんだ。
（perl のコードの最初に use warnings; 付けてるか？）

で、これを解決するには
・perl のコードを Shift-JIS で書かない。これ常識。EUC 使え。
・utf8 で書いて >>4 を参考に改造しろ。
これのどっちかだ。