perlスクリプトで "2032 - EIF - CR charが引用符で囲まれず、EOL @ posの一部ではありません"というエラーが発生しました

Question

.csvファイルから行を読み込むための単純なperlスクリプトを作成しました。コードは以下の通りである：

#!/usr/bin/perl 

use strict; 
use warnings; 

use Text::CSV; 

my $csv = Text::CSV->new({ binary => 1 }); 


open my $fh, "<", "testresults.csv" or die "testresults.csv $!"; 
while (my $row = $csv->getline($fh)) { 
     my @fields = @$row; 
} 
$csv->eof or $csv->error_diag; 
close $fh or die "testresults.csv $!"; 

そしてtestresults.csvファイルは次のようになります。

ノード1、ノード2、ノード3、ノード4、MAP1、MAP2、MAP3、MAP4、MAP5、map6、map7 、MAP8、DM、LAT、AVG、製品各ライン上の結果に続いて最初の行に

：

NAME1、NAME2、NAME3、NAME4、ノード1、ノード2、ノード3、ノード4、ノード5、ノード6、ノード7、ノード8,0％、
、 0.002835480002,0.1714008533,4.86003691857886E-04

など。私は、コマンドプロンプトから./filename.pl行う際

私は自分のコードで、次のエラーを取得しています： CSV_XSをERROR：2032 - EIF - EOLの@ POSの引用符で囲まれていない、いない部分の内側CR炭420

私はこのエラーについてGoogleに挑戦しましたが、このエラーを十分に理解できませんでした。

Answer 1

エラーがヌル文字でインターレースされた入力で文字列の来、迅速なハックがヌル文字を削除することです

use Data::Dumper; 
$Data::Dumper::Useqq = 1; 
while (<$fh>) { 
    print Dumper $_; 
} 

を使用することにより可視化されていることをコメントで私たちの会話からと思われます以下のようなもので、入力ファイル内：

perl -i.bak -pwe 'tr/\0//d' testresults.csv 

注：しかし、エンコードの問題でより多くの経験を積んだ人からのコメントで指摘されているように、これは//decodiによって解決されなければならない可能性ができます代わりにデータを保存してください。悪いシンボルを取り除くだけで、微妙な方法でデータが破損する可能性があり、理想的な解決策ではありません。

申し訳ありませんが、それについてはあまりよく分かりませんが、Text::CSV::Encodedを使用すると、cjmのようにうまく始まります。