ChinaUnix.net
相关文章推荐:

perl 大段注释

编写perl程序注释是不可少的,因为perl编码比较松散,不容易阅读,造成一个月或一年后你看不懂自己的代码。通常perl使用2个空格做缩进,为了适于阅读建议使用4个空格。perl中单行注释可以使用#符号,多行注释使用如下的#、=head与=cut。 perl多行注释:[code]# =head2 注释 这是多行注释 =for 注释 =cut[/code][code]# =head2[/code]是多行注释开始标记,=head后可以使用1-6的数字,对应html的h1-h6。[code]=cut[/code]是多行注...

by nonultimate - Perl - 2010-05-04 17:27:38 阅读(2153) 回复(1)

相关讨论

要把perl脚本内的注释都删除,但“#!/usr/bin/perl -w”肯定不能删除。 单行注释好删除,可多行注释不太好实现。 如a.pl [code] #!/usr/bin/perl -w # $Id: restore.pl,v 1.1.2.1Exp $ # user: root ……………… ……………… =head1 getRegistrationStatus @param seconds expiredtime @return 1: unregistered 2: registered 3: expiring 4: expired =cut ………...

by flyfeel - Perl - 2008-07-10 22:17:12 阅读(2111) 回复(2)

#!/usr/bin/perl 也是注释吗?

by axfilter - Perl - 2003-11-27 09:25:39 阅读(1909) 回复(3)

我使用的是vim,由于在.vimrc中设置了, set cindent,所以每次加注释的时候,键入的 # 号都会自动跑到行首,我还得手动将其与下面缩进的行对齐,很麻烦,有什么好办法能让#与接下来的行对齐么?谢谢啦!

by 羲之遗韵 - Perl - 2012-01-10 09:22:30 阅读(4283) 回复(22)

测试数据[code] [/code]

by yakczh - Perl - 2011-04-11 09:14:02 阅读(3606) 回复(6)

刚在一篇博客上看的如下内容: 成段注释: 1、=cut; ......; =cut; 2、=head; ......; =cut; 3、<< TXT; ......; TXT 4、# 单行注释 --------------------------------------------------------------- 具体测试了一下,结果如下: #!/usr/bin/perl -w use strict; my $a = 0; =pod #ok $a = aaa; =cut =head #ok $a = bbb; =cut #<

by flyfeel - Perl - 2011-08-04 11:21:38 阅读(27976) 回复(18)

perl写了一个准俄罗斯方块, 而且还借助了Shell来捕捉按键,装不了ReadKey的包,暂时只想到用这种笨办法 此版本罗斯方块有点特别,方块不会自己下落,呵呵 造成这种情况的主要原因是用<>来读按键的时候,会一直在那等哦,偶也不知道怎么描述偶的问题了,先上代码: 两个文件:"block.pl"和"b" 放在同一个目录,并运行: % chmod +x block.pl b 然后再运行block.pl, 开始游戏 perl 文件 "block.pl" [code] #!/usr/bin/perl # fil...

by crazidog - Perl - 2007-12-18 21:49:45 阅读(4592) 回复(12)

本帖最后由 vicki_guo 于 2013-03-29 20:25 编辑 我是一名perl的初学者。 看代码的时候经常很吃力,哪里可以找到perl的实例详细分析,比如每一行代码是什么意思,有详细的注释。这样学习起来比较快。

by vicki_guo - Perl - 2013-04-02 09:31:15 阅读(1598) 回复(9)

我如果要分离中间的代码的话用下面的方法好像不灵光 =KO code1 = KO code i need =NE code2 =NE

by justlooks - Perl - 2009-11-11 14:05:41 阅读(2089) 回复(3)

读《Learnning perl》时,看到一段CODE: $maximum = &max( 3, 5, 10, 4, 6 ); sub max { my ($myx_so_far) = shift @_; foreach (@_) { if ( $_ > $max_so_far ) { $max_so_far = $_; } } $max_so_far; } 书上把这种算法称之为:high-water mask算法:洪水过后,会在岸边留下痕迹。最高处的标记,表明了到达的最高水位。 我想把一些经典算法看熟了,解答问题的时候会方便的多,那就...

by mouse.rice - Perl - 2008-02-19 16:07:00 阅读(1773) 回复(0)

程序里有这样的注释,要求修改; /* comment start /* following coments /* again /* comment end */ 希望得到的结果是 /* comment start ** following coments ** again ** comment end */ 用sed尝试了很多,仍然没有能够解决。 请高手帮忙。谢谢。

by jcadam - Perl - 2007-09-14 19:04:34 阅读(3444) 回复(11)