Perl China Blog Spot: 2011-03-13

2011年3月18日星期五

[PerlChina] Re: [OT] 上海浦东北蔡莲溪路莲园路求合租

更正一下，小房是单人床，写错了

2011/3/18 cnhack TNT <cnhacktnt@gmail.com>

上海浦东北蔡莲溪路莲园路求合租～
目前住的另一室友工作变动要搬，空出一间房，我们的房子是两室一厅，全装全配三台空调，洗衣机热水器，厨具齐全，装修还不错。目前有 IPTV，2M 电信 ADSL，家中无线路由器，BT电驴下载机齐全。

有一大一小房间随你挑，我反正光棍无所谓，木地板，都带家具（是别人结婚的家具，不是简易货），卧室均朝南，大房双人床带阳台，小房双人床。不论大小房间，房租水电煤网一切费用平摊，房租一共2300，每人1150，一季度一交，我不是二房东，合同直接和房东签。

周围交通便利，小区正门口公交站两个，离龙阳路地铁站公车10分钟到。附近工行建行菜市场均200米内，超市若干，500米内有免费小公园一个，内有免费灯光篮球场和网球场，我每周三会去打篮球。离张江哈雷路的游泳馆骑车30分钟。

非常适合在龙阳路或者张江上班的同学。

现在的室友月底搬，我本人是做IT的，玩Perl，Linux和Mac。
如果你感兴趣请给我邮件，我们私下电话联系，我的要求就是你人靠谱，不抽烟爱干净就行，房东的要求是只能你一个人，小夫妻啥的不行。

照片（手机拍的不是很清楚）：http://min.us/mvj13P0

PS.: 为室友提供 Twitter API，下载机共享美剧电影，如果你是mac用户，接块移动硬盘家中的下载机同时可为你提供Time Machine备份：－）

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

Re: [PerlChina] [OT] 上海浦东北蔡莲溪路莲园路求合租

可惜了，俺还得过一阵子才过去工作...

在 2011年3月18日下午10:08，cnhack TNT <cnhacktnt@gmail.com>写道：

上海浦东北蔡莲溪路莲园路求合租～
目前住的另一室友工作变动要搬，空出一间房，我们的房子是两室一厅，全装全配三台空调，洗衣机热水器，厨具齐全，装修还不错。目前有 IPTV，2M 电信 ADSL，家中无线路由器，BT电驴下载机齐全。

有一大一小房间随你挑，我反正光棍无所谓，木地板，都带家具（是别人结婚的家具，不是简易货），卧室均朝南，大房双人床带阳台，小房双人床。不论大小房间，房租水电煤网一切费用平摊，房租一共2300，每人1150，一季度一交，我不是二房东，合同直接和房东签。

周围交通便利，小区正门口公交站两个，离龙阳路地铁站公车10分钟到。附近工行建行菜市场均200米内，超市若干，500米内有免费小公园一个，内有免费灯光篮球场和网球场，我每周三会去打篮球。离张江哈雷路的游泳馆骑车30分钟。

非常适合在龙阳路或者张江上班的同学。

现在的室友月底搬，我本人是做IT的，玩Perl，Linux和Mac。
如果你感兴趣请给我邮件，我们私下电话联系，我的要求就是你人靠谱，不抽烟爱干净就行，房东的要求是只能你一个人，小夫妻啥的不行。

照片（手机拍的不是很清楚）：http://min.us/mvj13P0

PS.: 为室友提供 Twitter API，下载机共享美剧电影，如果你是mac用户，接块移动硬盘家中的下载机同时可为你提供Time Machine备份：－）

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

[PerlChina] [OT] 上海浦东北蔡莲溪路莲园路求合租

上海浦东北蔡莲溪路莲园路求合租～

目前住的另一室友工作变动要搬，空出一间房，我们的房子是两室一厅，全装全配三台空调，洗衣机热水器，厨具齐全，装修还不错。目前有 IPTV，2M 电信 ADSL，家中无线路由器，BT电驴下载机齐全。

有一大一小房间随你挑，我反正光棍无所谓，木地板，都带家具（是别人结婚的家具，不是简易货），卧室均朝南，大房双人床带阳台，小房双人床。不论大小房间，房租水电煤网一切费用平摊，房租一共2300，每人1150，一季度一交，我不是二房东，合同直接和房东签。

周围交通便利，小区正门口公交站两个，离龙阳路地铁站公车10分钟到。附近工行建行菜市场均200米内，超市若干，500米内有免费小公园一个，内有免费灯光篮球场和网球场，我每周三会去打篮球。离张江哈雷路的游泳馆骑车30分钟。

非常适合在龙阳路或者张江上班的同学。

现在的室友月底搬，我本人是做IT的，玩Perl，Linux和Mac。

如果你感兴趣请给我邮件，我们私下电话联系，我的要求就是你人靠谱，不抽烟爱干净就行，房东的要求是只能你一个人，小夫妻啥的不行。

照片（手机拍的不是很清楚）：http://min.us/mvj13P0

PS.: 为室友提供 Twitter API，下载机共享美剧电影，如果你是mac用户，接块移动硬盘家中的下载机同时可为你提供Time Machine备份：－）

[PerlChina] Re: 最近社区很是热闹啊！

赞! 像我这样的新手有福了

On 3月10日, 下午6时11分, Shu Cao <shu...@gmail.com> wrote:
> 看这个thread: http://www.gossamer-threads.com/lists/perl/porters/261316
>
> --
> Shu Cao

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

2011年3月15日星期二

Re: Re: [PerlChina] Perl有没交互式的shell

perl -de 1 可以用 \ 来换行

$ perl -de 1

Loading DB routines from perl5db.pl version 1.33
Editor support available.

Enter h or `h h' for help, or `man perldebug' for more help.

main::(-e:1): 1
DB<1> for (1..3){\
cont: print; \
cont: }
123

2011/3/2 Achilles Xu <formalin14@gmail.com>:
> 语法有点变化。主要是前缀不变，其他的perl5语法应该都能执行。
>
> 在 2011年3月1日下午9:41，Cond0r <cond0r@126.com>写道：
>>
>> perl6？..语法没变化吗？perl -de 0 if啥的语句都得写一行...不舒服
>>
>> 在2011-02-27，"Achilles Xu" <formalin14@gmail.com> 写道：
>>
>> -----原始邮件-----
>> 发件人:"Achilles Xu" <formalin14@gmail.com>
>> 发送时间:2011年2月27日星期日
>> 收件人:perlchina@googlegroups.com
>> 主题:Re: [PerlChina] Perl有没交互式的shell
>>
>> perl6
>>
>> 在 2011年2月27日下午10:59，万�新<xunxin.wan@qunar.com>写道：
>>>
>>> perl -de 0
>>>
>>> 2011/2/27 rochelle hsu<rjhome@gmail.com>
>>>>
>>>> perl -d?
>>>>
>>>> 在 2011-2-27 下午8:23，"Cond0r" <cond0r@126.com>写道：
>>>>
>>>> --
>>>> 您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
>>>> 要向此网上论坛发帖，请发送电子邮件至perlchina@googlegroups.com。
>>>> 要取消订阅此网上论坛，请发送电子邮件至perlchina+unsubscribe@googlegroups.com。
>>>> 若有更多问题，请通过http://groups.google.com/group/perlchina?hl=zh-CN访问此网上论坛。
>>>
>>> --
>>> 您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
>>> 要向此网上论坛发帖，请发送电子邮件至perlchina@googlegroups.com。
>>> 要取消订阅此网上论坛，请发送电子邮件至perlchina+unsubscribe@googlegroups.com。
>>> 若有更多问题，请通过http://groups.google.com/group/perlchina?hl=zh-CN访问此网上论坛。
>>
>>
>>
>> --
>> ---------------------------
>> Achilles Xu
>>
>> --
>> 您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
>> 要向此网上论坛发帖，请发送电子邮件至perlchina@googlegroups.com。
>> 要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
>> 若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。
>>
>>
>> --
>> 您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
>> 要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
>> 要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
>> 若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。
>
>
>
> --
> ---------------------------
> Achilles Xu
>
> --
> 您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
> 要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
> 要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
> 若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。
>

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

[PerlChina] Re: 如何不让Tie::Handle::CSV 在字符串外加双引号""？

谢谢，不过 "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.

On Mar 10, 6:01 pm, Shu Cao <shu...@gmail.com> wrote:
> 改成如下：
>
> 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);
>
> ...
>
> 2011/3/10 许高飞 <flyhig...@gmail.com>:
>
> > 请教一下大家，我在用Tie::Handle::CSV模块处理CSV文件时，发现其输出时会在字符串外加双引号""。
> > 例如：
> > FOOBAR, Name, Type,
> > 输出会变成：
> > FOOBAR," Name"," Type"," "
> > 有什么办法不让Tie::Handle::CSV 在字符串外加双引号""吗？
> > 代码例子见附件。
>
> > --
> > 您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
> > 要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
> > 要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
> > 若有更多问题，请通过http://groups.google.com/group/perlchina?hl=zh-CN访问此网上论坛。
>
> --
> Shu Cao

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

Perl China Blog Spot