本人菜鸟,看了下面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

帮忙看看

    1#!/usr/bin/perl    2usewarnings;    3#usestrict;   

作者: leal402 发布时间: 07-29

gtk的多线程问题

#!/bin/envperlusestrict;usewarnings;usethreads;useGtk2;useGlibqw(TRUEFALSE);

作者: wfnh 发布时间: 07-29

perl对数函数可否自定义底数

perl对数函数retval=log(value),这是以e为底的自然对数函数,怎样才能设为自己想要的底数,比如以2为底数.

作者: estbio 发布时间: 07-29

和Perl无关

这个和Perl无关,但不知道该发在那里问。也知道Perl的人比较好。水平比较高。特此发帖在此,请教linux下有什么小游戏吗?谢谢。

作者: alleva 发布时间: 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

请教perl实时绘图

请教大侠,想实时获取系统性能值,然后实时绘图,关键这个图形怎么能够实时画呢?使用tk的事件触发么?多谢了

作者: demil 发布时间: 07-28