用perl创建csv文件

下面我的代码片段：

use Text::CSV_XS;

my @a =('ID','VALUE'); 


open my $OUTPUT,'>',"file.csv" or die "Can't able to open file.csv\n";

my $csv = Text::CSV_XS->new ({ binary => 1,eol => $/ });



$csv->print($OUTPUT,\@a);

这个代码生成一个file.csv,但是当我尝试用xls打开file.csv时,xls写这个文件是SYLK,不知道有人可以帮助为什么这个csv不能用xls打开？