-
本人菜鸟,看了下面longbow0 的code有些不理解,请高手指教本帖最后由xlli000于2010-07-3010:35编辑首先感谢longbow0的帮忙,学习perl中,有些不理解。my(@first,@second,@third);while(<DATA>){ chomp; &nxlli000 时间:07-30 + 阅读全文
-
Rakudo star 已经发布!Announce:RakudoStar-auseful,usable,"earlyadopter"distributionofPerl6SubmittedbypmichaudonThu,07/29/2010-05:18OnbehalfoftheRakudoandPerl6developmentteams,I'mhappytoannouflw 时间:07-29 + 阅读全文
-
请问在正则前面加一个~是什么意思?没有=号在读代码时看到if(~/abcd/){} ,之前只见过$a=~/abcd/这种表达式,如果不和一个变量绑定,是什么意思,取反吗?frymgump 时间:07-29 + 阅读全文
-
求助:如何实现下面的控制?下载(42.42KB)2010-07-2917:31我有很多线段,每个线段都有名字,用$hash{$name}[0]和$hash{$name}[1]存每个线段的起点坐标和终点坐标。 我要把这些线段整合到一起,用SVG作图。 如果那些线段没有重叠的现象,那直接按坐标,一个线段一个线段的画;但这些线段有些是长生天一 时间:07-29 + 阅读全文
-
perl对数函数可否自定义底数perl对数函数retval=log(value),这是以e为底的自然对数函数,怎样才能设为自己想要的底数,比如以2为底数.estbio 时间:07-29 + 阅读全文
-
perl 匹配问题请教(谢谢)问题一:/^(?:1\s(?:\d\d\d\s)?|(\d\d\d)\s|(?:\+\d\d?\d?\s)?\d\d\d([\s\-]))\d\d\d(\s|\1)\d\d\d\d$/x(\s|\1) 里面的\1是什么意思?问题二:s/^([^\012\015]*)(\012\015?|\015\012?)//\012是什么意思whitecell 时间:07-29 + 阅读全文