2010年7月31日星期六

[PerlChina] Re: 深更半夜，Rakudo Star 发布！

linux下面也不是很快，不到1秒，不过不像使用perl5那样即刻出现结果。

是不是因为perl6先要编译成pir中间格式，然后再load Parrot进来执行, 所以就免不了要为小事情做大动作。

话说回来，当前只是whatever的版本，期待会做得更好。

On Jul 31, 6:37 pm, Michael Zeng <galaxy2...@gmail.com> wrote:
> 运行起来不要太慢
>
> perl6 -e " say 'hello world' " 要十几秒 ， 我下载了 win32版
>
> 2010/7/30 phenicsl <pheni...@gmail.com>
>
>
>
> > 乐土之星终于到来！
>
> > On Jul 30, 12:08 am, smallfish <smallfish...@gmail.com> wrote:
> > > Rakudo Star 发布，Perl 6 看起来速度也加快了！
>
> > >http://rakudo.org/announce/rakudo-star/2010.07
>
> > > --
> > > blog:http://chenxiaoyu.orgtwitter: @nnfish <http://twitter.com/nnfish>
>
> > --
> > 您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
> > 要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
> > 要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com<perlchina%2Bunsubscribe@googlegroups.com>
> > 。
> > 若有更多问题，请通过http://groups.google.com/group/perlchina?hl=zh-CN访问此网上论坛。
>
> --
> Yours Sincerely
> Zeng Hong

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

发帖者 时间： 没有评论:

Re: [PerlChina] Re: 深更半夜，Rakudo Star 发布！

运行起来不要太慢
 
perl6  -e  " say  'hello world' "  要十几秒  ， 我下载了 win32版

2010/7/30 phenicsl <phenicsl@gmail.com>
乐土之星终于到来！

On Jul 30, 12:08 am, smallfish <smallfish...@gmail.com> wrote:
> Rakudo Star 发布，Perl 6 看起来速度也加快了！
>
> http://rakudo.org/announce/rakudo-star/2010.07

> --
> blog:http://chenxiaoyu.org twitter: @nnfish <http://twitter.com/nnfish>

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




--
            Yours Sincerely
                    Zeng Hong

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

2010年7月30日星期五

Re: [PerlChina] 这个算bug吗？

呵呵，发现问题后查文档当然知道了应该用eq ：）
我是想就这个问题讨论下语言的设计和选择，呵呵



在 2010年7月30日 下午8:19，Easun <easunlee@gmail.com>写道：
别用 ==  比较字符串。。。

2010/7/30 cnhack TNT <cnhacktnt@gmail.com>:
> 字符串比较请用 eq， ne
>
> 2010/7/30 snyh <snyh@snyh.org>
>>
>> 按照自然语言来看
>> 字母转换成 0  而不是它的ASCII码  应该更合理吧。 。。
>>
>> 在 2010年7月30日 下午5:09，snyh <snyh@snyh.org> 写道：
>> > 0 == 0
>> >
>> > perl 里面字符串不像C会把 char 转换成int
>> > 'G' == 0    is true.
>> > 'a' == 0     is true.
>> > 'ab123' == 0  is ture.
>> > '0adb' == 0  is ture.
>> > '12abc' == 0  is false.
>> >
>> >
>> > 在 2010年7月30日 下午3:13，Wan Li <wanliyou@gmail.com> 写道：
>> >> 平常写也打开
>> >> use strict;
>> >> use warnings;
>> >>
>> >> --
>> >> 您收到此邮件是因为您订阅了 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 访问此网上论坛。
>>
>
> --
> 您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
> 要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
> 要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
> 若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。
>



--
-----------------------
http://easun.org

--
您收到此邮件是因为您订阅了 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 访问此网上论坛。
发帖者 时间： 没有评论:

Re: [PerlChina] 这个算bug吗？

别用 == 比较字符串。。。

2010/7/30 cnhack TNT <cnhacktnt@gmail.com>:
> 字符串比较请用 eq， ne
>
> 2010/7/30 snyh <snyh@snyh.org>
>>
>> 按照自然语言来看
>> 字母转换成 0 而不是它的ASCII码 应该更合理吧。 。。
>>
>> 在 2010年7月30日 下午5:09，snyh <snyh@snyh.org> 写道：
>> > 0 == 0
>> >
>> > perl 里面字符串不像C会把 char 转换成int
>> > 'G' == 0 is true.
>> > 'a' == 0 is true.
>> > 'ab123' == 0 is ture.
>> > '0adb' == 0 is ture.
>> > '12abc' == 0 is false.
>> >
>> >
>> > 在 2010年7月30日 下午3:13，Wan Li <wanliyou@gmail.com> 写道：
>> >> 平常写也打开
>> >> use strict;
>> >> use warnings;
>> >>
>> >> --
>> >> 您收到此邮件是因为您订阅了 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 访问此网上论坛。
>>
>
> --
> 您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
> 要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
> 要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
> 若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。
>

--
-----------------------
http://easun.org

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

发帖者 时间： 没有评论:

Re: [PerlChina] 正则表达的问题和如何抓取网页信息

网页信息抽取，用 Web::Scraper 会方便得多



2010/7/30 Qiang (James) <shijialee@gmail.com>
xuanshi wrote:
> Hi all
>
>
> 1，我在做 正则表达时， 我用了如下的语句： if ($KnowEn[$i] =~ /\$Instance/)
>                                       {
>                                               print $KnowEn[$i] ."\n";
>                                       }
> 系统总是对这个报错。我想知道，是什么原因呢 ？ 我现在猜测是：$KnowEn[$i]与循环有关，出了问题，环不下去，还有原文件里有空白的行。
>

报什么错？最重要的错误信息请不要省略。

>
>
>
> 2， 另外，我想从一个网页里，把我需要的信息抓取下来，要从哪里入手呢？比如这个网站：
> http://www2.chkd.cnki.net/kns50/Dict/dict_list.aspx?firstLetter=B#
> 有如下信息，有些是重要的，有些不重要。

你需要先抓网页(通过 LWP 或 WWW::Mechanize 即可)，然后根据内容的分布来匹
配(你可以通过正则匹配或是 CPAN 上的一些模块)。

这是 LWP 的一个教程 http://wiki.perlchina.org/LWP与WEB的基本使用

鉴于你要抓取的内容是在一个 html table 里，你可以使用
CPAN(search.cpan.org) 上众多的解析 table 的模块，例如 HTML::TableExtract
和 HTML::TableParser。

Qiang (James)

--
您收到此邮件是因为您订阅了 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 访问此网上论坛。
发帖者 时间： 没有评论:

Re: [PerlChina] 这个算bug吗？

字符串比较请用 eq， ne


2010/7/30 snyh <snyh@snyh.org>
按照自然语言来看
字母转换成 0  而不是它的ASCII码  应该更合理吧。 。。

在 2010年7月30日 下午5:09，snyh <snyh@snyh.org> 写道：
> 0 == 0
>
> perl 里面字符串不像C会把 char 转换成int
> 'G' == 0    is true.
> 'a' == 0     is true.
> 'ab123' == 0  is ture.
> '0adb' == 0  is ture.
> '12abc' == 0  is false.
>
>
> 在 2010年7月30日 下午3:13，Wan Li <wanliyou@gmail.com> 写道：
>> 平常写也打开
>> use strict;
>> use warnings;
>>
>> --
>> 您收到此邮件是因为您订阅了 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 访问此网上论坛。


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

Re: [PerlChina] 这个算bug吗？

按照自然语言来看
字母转换成 0 而不是它的ASCII码 应该更合理吧。 。。

在 2010年7月30日 下午5:09，snyh <snyh@snyh.org> 写道：
> 0 == 0
>
> perl 里面字符串不像C会把 char 转换成int
> 'G' == 0 is true.
> 'a' == 0 is true.
> 'ab123' == 0 is ture.
> '0adb' == 0 is ture.
> '12abc' == 0 is false.
>
>
> 在 2010年7月30日 下午3:13，Wan Li <wanliyou@gmail.com> 写道：
>> 平常写也打开
>> use strict;
>> use warnings;
>>
>> --
>> 您收到此邮件是因为您订阅了 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 访问此网上论坛。

发帖者 时间： 没有评论:

Re: [PerlChina] 这个算bug吗？

0 == 0

perl 里面字符串不像C会把 char 转换成int
'G' == 0 is true.
'a' == 0 is true.
'ab123' == 0 is ture.
'0adb' == 0 is ture.
'12abc' == 0 is false.


在 2010年7月30日 下午3:13，Wan Li <wanliyou@gmail.com> 写道：
> 平常写也打开
> use strict;
> use warnings;
>
> --
> 您收到此邮件是因为您订阅了 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 访问此网上论坛。

发帖者 时间： 没有评论:

Re: [PerlChina] OSCON 美国开源大会的演讲下载

Great! I like the Moose is Perl so much...

Qiang (James) 写道:
> http://www.oscon.com/oscon2010/public/schedule/proceedings
>
> 一年一度的盛会刚结束，很多演讲可以下载。
>
> Qiang (James)
>


--
Perl乐事 -- http://www.perlersh.org
我的博客 -- http://www.perlersh.org/blog.html
诸法从缘起，如来说是因。
彼法因缘尽，是大沙门说。

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

发帖者 时间： 没有评论:

Re: [PerlChina] 这个算bug吗？

平常写也打开
use strict;
use warnings;

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

[PerlChina] 这个算bug吗？

平时不用perl写程序，偶尔用来对付些小的串处理的需求。发现一个问题。
用下面一小段程序测试，结果显示 equal
my $c='G';
if ($c == 'a')
{
 print 'equal';
};

== 在documentation 里给的解释是 returns true if the left argument is numerically equal to the right argument.
难道 G 和 C 作为字符转化为的number 能够相等吗？

另外，如果==这个操作符只能作用于数字类型的参数，按强类型语言的理念，应该报编译错误，而作为弱类型语言，perl猜测了变量的类型？而实际无论从哪个角度理解---存储器实际存储值，或者是按某种合理的转化规则转换为的数字----二者都不能相等啊！

哪位能够给出解释？

错误要在编译时尽量暴露的目的之一，按我的理解，是使得尽量减少语义表达的不准确性造成的排错困难，而perl的设计目标却是能够尽量像用自然语言一样使用编程语言（？），我觉得这是不对的。不能仅仅为这一时的学习曲线的平缓（和自然语言有类似概念，比如复数和单数就直接对应语言中的标量和向量）就很大地牺牲了写程序和排错的效率。不理解在何种应用情况下这个特点是一种优势？

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

2010年7月29日星期四

[PerlChina] Re: 深更半夜，Rakudo Star 发布！

乐土之星终于到来！

On Jul 30, 12:08 am, smallfish <smallfish...@gmail.com> wrote:
> Rakudo Star 发布，Perl 6 看起来速度也加快了！
>
> http://rakudo.org/announce/rakudo-star/2010.07
>
> --
> blog:http://chenxiaoyu.org twitter: @nnfish <http://twitter.com/nnfish>

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

[PerlChina] OSCON 美国开源大会的演讲下载

http://www.oscon.com/oscon2010/public/schedule/proceedings

一年一度的盛会刚结束，很多演讲可以下载。

Qiang (James)

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

发帖者 时间： 没有评论:

Re: [PerlChina] 正则表达的问题和如何抓取网页信息

xuanshi wrote:
> Hi all
>
>
> 1，我在做 正则表达时， 我用了如下的语句： if ($KnowEn[$i] =~ /\$Instance/)
> {
> print $KnowEn[$i] ."\n";
> }
> 系统总是对这个报错。我想知道，是什么原因呢 ？ 我现在猜测是：$KnowEn[$i]与循环有关，出了问题，环不下去，还有原文件里有空白的行。
>

报什么错？最重要的错误信息请不要省略。

>
>
>
> 2， 另外，我想从一个网页里，把我需要的信息抓取下来，要从哪里入手呢？比如这个网站：
> http://www2.chkd.cnki.net/kns50/Dict/dict_list.aspx?firstLetter=B#
> 有如下信息，有些是重要的，有些不重要。

你需要先抓网页(通过 LWP 或 WWW::Mechanize 即可)，然后根据内容的分布来匹
配(你可以通过正则匹配或是 CPAN 上的一些模块)。

这是 LWP 的一个教程 http://wiki.perlchina.org/LWP与WEB的基本使用

鉴于你要抓取的内容是在一个 html table 里，你可以使用
CPAN(search.cpan.org) 上众多的解析 table 的模块，例如 HTML::TableExtract
和 HTML::TableParser。

Qiang (James)

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

发帖者 时间： 没有评论:

Re: [PerlChina] 正则表达的问题和如何抓取网页信息

//table[contains(concat(' ', @class, ' '), ' GridTableContent ')]//tr[not(@align)]//td[1]   第一列    1，2，3，4....
//table[contains(concat(' ', @class, ' '), ' GridTableContent ')]//tr[not(@align)]//td[2]   第二列   
11-beta-Hydroxysteroid Dehydrogenase Type 1  ...
//table[contains(concat(' ', @class, ' '), ' GridTableContent ')]//tr[not(@align)]//td[3]   第三列    11-β-羟甾脱氢酶1型   ...

......
 
 
 
在 2010年7月30日 上午7:59，azure wang <azure1st@gmail.com>写道：
用 xpath

在 2010年7月29日 下午10:18，xuanshi <xuanbonn@googlemail.com>写道：

Hi all


1，我在做 正则表达时， 我用了如下的语句： if ($KnowEn[$i] =~ /\$Instance/)
                                       {
                                               print $KnowEn[$i] ."\n";
                                       }
系统总是对这个报错。我想知道，是什么原因呢 ？ 我现在猜测是：$KnowEn[$i]与循环有关，出了问题，环不下去，还有原文件里有空白的行。




2， 另外，我想从一个网页里，把我需要的信息抓取下来，要从哪里入手呢？比如这个网站：
http://www2.chkd.cnki.net/kns50/Dict/dict_list.aspx?firstLetter=B#
有如下信息，有些是重要的，有些不重要。
1       11-beta-Hydroxysteroid Dehydrogenase Type 1     11-β-羟甾脱氢酶1型    2       0       0       0
2       11-beta-Hydroxysteroid Dehydrogenase Type 2     11-β-羟甾脱氢酶2型    0       0       0       0
3       11-beta-Hydroxysteroid Dehydrogenases   11-β-羟甾脱氢酶类     73      23      12      1
4       4-(3-Butoxy-4-methoxybenzyl)-2-imidazolidinone  4-(3-丁氧基-4-甲氧基苄基)-2-咪唑
啉酮      0       0       0       0
5       4-1BB Ligand    4-1BB配体 80      24      24      0
6       4-Butyrolactone 4-丁内酯   74      16      2       5
7       8-Bromo Cyclic Adenosine Monophosphate  8-溴环腺苷一磷酸       9       1       0       0
8       B-Cell Activating Factor        B-细胞激活因子        96      37      33

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




--
Azure.Wang



--
Azure.Wang

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

Re: [PerlChina] 正则表达的问题和如何抓取网页信息

用 xpath

在 2010年7月29日 下午10:18，xuanshi <xuanbonn@googlemail.com>写道：
Hi all


1，我在做 正则表达时， 我用了如下的语句： if ($KnowEn[$i] =~ /\$Instance/)
                                       {
                                               print $KnowEn[$i] ."\n";
                                       }
系统总是对这个报错。我想知道，是什么原因呢 ？ 我现在猜测是：$KnowEn[$i]与循环有关，出了问题，环不下去，还有原文件里有空白的行。




2， 另外，我想从一个网页里，把我需要的信息抓取下来，要从哪里入手呢？比如这个网站：
http://www2.chkd.cnki.net/kns50/Dict/dict_list.aspx?firstLetter=B#
有如下信息，有些是重要的，有些不重要。
1       11-beta-Hydroxysteroid Dehydrogenase Type 1     11-β-羟甾脱氢酶1型    2       0       0       0
2       11-beta-Hydroxysteroid Dehydrogenase Type 2     11-β-羟甾脱氢酶2型    0       0       0       0
3       11-beta-Hydroxysteroid Dehydrogenases   11-β-羟甾脱氢酶类     73      23      12      1
4       4-(3-Butoxy-4-methoxybenzyl)-2-imidazolidinone  4-(3-丁氧基-4-甲氧基苄基)-2-咪唑
啉酮      0       0       0       0
5       4-1BB Ligand    4-1BB配体 80      24      24      0
6       4-Butyrolactone 4-丁内酯   74      16      2       5
7       8-Bromo Cyclic Adenosine Monophosphate  8-溴环腺苷一磷酸       9       1       0       0
8       B-Cell Activating Factor        B-细胞激活因子        96      37      33

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




--
Azure.Wang

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

[PerlChina] [OT] 深更半夜，Rakudo Star 发布！

Rakudo Star 发布，Perl 6 看起来速度也加快了！

http://rakudo.org/announce/rakudo-star/2010.07

--

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

[PerlChina] 正则表达的问题和如何抓取网页信息

Hi all


1，我在做 正则表达时， 我用了如下的语句： if ($KnowEn[$i] =~ /\$Instance/)
{
print $KnowEn[$i] ."\n";
}
系统总是对这个报错。我想知道，是什么原因呢 ？ 我现在猜测是：$KnowEn[$i]与循环有关，出了问题，环不下去，还有原文件里有空白的行。


2， 另外，我想从一个网页里，把我需要的信息抓取下来，要从哪里入手呢？比如这个网站：
http://www2.chkd.cnki.net/kns50/Dict/dict_list.aspx?firstLetter=B#
有如下信息，有些是重要的，有些不重要。
1 11-beta-Hydroxysteroid Dehydrogenase Type 1 11-β-羟甾脱氢酶1型 2 0 0 0
2 11-beta-Hydroxysteroid Dehydrogenase Type 2 11-β-羟甾脱氢酶2型 0 0 0 0
3 11-beta-Hydroxysteroid Dehydrogenases 11-β-羟甾脱氢酶类 73 23 12 1
4 4-(3-Butoxy-4-methoxybenzyl)-2-imidazolidinone 4-(3-丁氧基-4-甲氧基苄基)-2-咪唑
啉酮 0 0 0 0
5 4-1BB Ligand 4-1BB配体 80 24 24 0
6 4-Butyrolactone 4-丁内酯 74 16 2 5
7 8-Bromo Cyclic Adenosine Monophosphate 8-溴环腺苷一磷酸 9 1 0 0
8 B-Cell Activating Factor B-细胞激活因子 96 37 33

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

发帖者 时间： 没有评论:

2010年7月26日星期一

Re: [PerlChina] Rose::DB::Object与Moose的meta冲突，有无办法平滑整合？

Hello,
I have viewed this article. But I think it's complex. I hope to find out
another simple way.
Thanks!

cnhack TNT 写道:
> http://rohan.almeida.in/archives/moose-with-rosedbobject-roose-morose
>
> 2010/7/25 Beckheng Lam <bi.ken.lam@gmail.com
> <mailto:bi.ken.lam@gmail.com>>
>
> Hello,
> 我本欲将Moose加入到系统中,却在过程中遇到Moose和Rose::DB::Object都使
> 用了meta而引起的冲突。
> 例如此等语句:
> __PACKAGE__->meta->make_manager_class('member')
> 皆无法运行。
>
> 谢谢!
>
>


--
Perl乐事 -- http://www.perlersh.org
我的博客 -- http://www.perlersh.org/blog.html
诸法从缘起，如来说是因。
彼法因缘尽，是大沙门说。

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

发帖者 时间： 没有评论:

2010年7月25日星期日

Re: [PerlChina] 如何纠正out of memory错误？

从贴代码，描述任务开始？

2010/7/26 James zhang <james.uchicago@gmail.com>
我编写一个从会计报告中抽取特定部分的程序，将特定部分存到文件里，可是每次都会出现out of memory的错误！请问该从哪方面下手纠错呢？

--
您收到此邮件是因为您订阅了 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] 如何纠正out of memory错误？

我编写一个从会计报告中抽取特定部分的程序，将特定部分存到文件里，可是每次都会出现out of memory的错误！请问该从哪方面下手纠错呢？

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

Re: 回复： [PerlChina] 最近距离算法

这个和perl 没啥关系
 
完全是算法问题， 想好了  只是 用perl写出来而已
 
有个书叫 Algorithm perl   讲算法多些，  比如数据结构，链表等
 

 
2010/7/24 jack black <adolblackjack@gmail.com>
algorithm for solving TSPs [Example ]
http://blog.csdn.net/jiuyizhizhu/archive/2010/04/06/5454724.aspx




在 2010年7月23日 下午11:31，PIG <addmyin@gmail.com> 写道：
> 这个题有点问题啊，旅游区要走的路是修好的，山坡上只有羊儿在吃草。。
>
> 在 2010年7月23日 下午11:27，Xiaojun Deng <xjdengz@gmail.com> 写道：
>> 这个是NP难题，只能求最优解吧。除非你用穷举，但时间复杂度是O(n!)
>> 简单的可以用贪婪法解，就是找最近的点，然后去那个点，再找离他最近的点，直到所有的点
>> 都被找完。
>>
>> 2010/7/23 一杯白开水 <qfsun@qq.com>
>>>
>>> 有没有代码可供参考啊？头都想大了，代码不知道如何写了？
>>>
>>>
>>> ------------------ 原始邮件 ------------------
>>> 发件人: "Xiaojun Deng"<xjdengz@gmail.com>;
>>> 发送时间: 2010年7月23日(星期五) 晚上11:09
>>> 收件人: "perlchina"<perlchina@googlegroups.com>;
>>> 主题: Re: [PerlChina] 最近距离算法
>>>
>>> 这是TSP货郎担问题吧，NP难题啊，用动态规划求最优解吧
>>>
>>> 2010/7/21 一杯白开水 <qfsun@qq.com>
>>>>
>>>>          从A点开车去旅游，需要游完图中所有的旅游景点，怎样计算最近的距离,perl算法应该怎样写呢?
>>>>
>>>>
>>>> --
>>>> 您收到此邮件是因为您订阅了 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 访问此网上论坛。
>>>
>>> --
>>> 您收到此邮件是因为您订阅了 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 访问此网上论坛。
>>
>>
>
> --
> 您收到此邮件是因为您订阅了 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 访问此网上论坛。




--
            Yours Sincerely
                    Zeng Hong

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

Re: [PerlChina] Rose::DB::Object与Moose的meta冲突，有无办法平滑整合？

http://rohan.almeida.in/archives/moose-with-rosedbobject-roose-morose

2010/7/25 Beckheng Lam <bi.ken.lam@gmail.com>
Hello,
   我本欲将Moose加入到系统中,却在过程中遇到Moose和Rose::DB::Object都使
用了meta而引起的冲突。
   例如此等语句:
   __PACKAGE__->meta->make_manager_class('member')
   皆无法运行。

   谢谢!

--
Perl乐事 -- http://www.perlersh.org
我的博客 -- http://www.perlersh.org/blog.html
诸法从缘起，如来说是因。
彼法因缘尽，是大沙门说。

--
您收到此邮件是因为您订阅了 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 访问此网上论坛。
发帖者 时间： 没有评论:
订阅： 博文 (Atom)