$strもEUC-JPでスクリプトもEUC-JP
$str =~ s/　//g;
ってやっても文字化けするケースと
そのまま正常なケースがあるんだがなんでだろ？

Perlメモを見て
$Zspace = '(?:\xA1\xA1)';
$str =~ s/$Zspace//g;
でやっても無理だった