本人菜鸟,看了下面longbow0 的code有些不理解,请高手指教
本帖最后由xlli000于2010-07-3010:35编辑首先感谢longbow0的帮忙,学习perl中,有些不理解。my(@first,@second,@third);while(<DATA>){ chomp; &n
作者: xlli000 发布时间: 07-30
Rakudo star 已经发布!
Announce:RakudoStar-auseful,usable,"earlyadopter"distributionofPerl6SubmittedbypmichaudonThu,07/29/2010-05:18OnbehalfoftheRakudoandPerl6developmentteams,I'mhappytoannou
作者: flw 发布时间: 07-29
请问在正则前面加一个~是什么意思?没有=号
在读代码时看到if(~/abcd/){} ,之前只见过$a=~/abcd/这种表达式,如果不和一个变量绑定,是什么意思,取反吗?
作者: frymgump 发布时间: 07-29
求助:如何实现下面的控制?
下载(42.42KB)2010-07-2917:31我有很多线段,每个线段都有名字,用$hash{$name}[0]和$hash{$name}[1]存每个线段的起点坐标和终点坐标。 我要把这些线段整合到一起,用SVG作图。 如果那些线段没有重叠的现象,那直接按坐标,一个线段一个线段的画;但这些线段有些是
作者: 长生天一 发布时间: 07-29
gtk的多线程问题
#!/bin/envperlusestrict;usewarnings;usethreads;useGtk2;useGlibqw(TRUEFALSE);
作者: wfnh 发布时间: 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