Re: [PerlChina] perlchina@googlegroups.com 的摘要 - “5 个主题”有 15 个帖子

谢谢，不过 "allow_whitespace = 1" 会把头尾的空白字符去掉，有什么办法把这些空白字符也保留下来吗？

    allow_whitespace
        When this option is set to true, whitespace (TAB's and SPACE's)
        surrounding the separation character is removed when parsing.

在 2011年3月11日 下午3:20， <perlchina+noreply@googlegroups.com>写道：

 主题: 如何不让Tie::Handle::CSV 在字符串外加双引号""？

许高飞 <flyhighxu@gmail.com> Mar 10 04:58PM +0800 ^

 
请教一下大家，我在用Tie::Handle::CSV模块处理CSV文件时，发现其输出时会在字符串外加双引号""。
例如：
FOOBAR, Name, Type,
输出会变成：
FOOBAR," Name"," Type"," "
有什么办法不让Tie::Handle::CSV 在字符串外加双引号""吗？
代码例子见附件。


 

Robin Lee <robinlee.sysu@gmail.com> Mar 10 05:39PM +0800 ^

 
因为有空格，所以加双引号是规范的做法，试试写成
FOOBAR,Name,Type,
也就是逗号后不加空格


 

Shu Cao <shucao@gmail.com> Mar 10 06:01PM +0800 ^

 
改成如下：
 
use Text::CSV_XS;
 
...
 
my $csv_parser = Text::CSV_XS->new( {allow_whitespace => 1} );
my $fh_input = Tie::Handle::CSV->new("$inputfile", header => 1,
csv_parser => $csv_parser);
 
...
 
 
--
Shu Cao


 

--
您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。