免费注册 查看新帖 |

ChinaUnix.net

  平台 论坛 博客 文库 频道自动化运维 虚拟化 储存备份 C/C++ PHP MySQL 嵌入式 Linux系统
最近访问板块 发新帖
查看: 1159 | 回复: 4

perl这段代码怎么理解 [复制链接]

论坛徽章:
0
发表于 2018-11-14 14:31 |显示全部楼层
while(<>){

    ($contig[$i], $start[$i], $end[$i], $name[$i], $score[$i], $orient[$i]) = split;
   
    $i ++
}

$j=0;

while($j<=$#contig){
   
    if($contig[$j-1] eq $contig[$j]){
        $prev_start=$start[$j-1] - $start[$j];
    }else{
        $prev_start = undef;
}

#其中的while($j<=$#contig),“<=”这个怎么理解?还有,“#”,是用于注释吗?但注释一般放在行末,怎么理解呢?

论坛徽章:
0
发表于 2018-11-14 19:24 |显示全部楼层
$#contig是数组的大小

论坛徽章:
0
发表于 2018-11-15 12:42 |显示全部楼层
不懂,能说具体点吗?

论坛徽章:
39
技术图书徽章
日期:2018-08-21 13:30:492015亚冠之首尔
日期:2015-11-04 22:25:43IT运维版块每日发帖之星
日期:2015-08-17 06:20:00寅虎
日期:2014-06-04 16:25:27狮子座
日期:2014-05-12 11:00:00辰龙
日期:2013-12-20 17:07:19射手座
日期:2013-10-24 21:01:23CU十二周年纪念徽章
日期:2013-10-24 15:41:34数据库技术版块每日发帖之星
日期:2015-12-01 06:20:00平安夜徽章
日期:2015-12-26 00:06:30技术图书徽章
日期:2018-08-21 13:30:242016科比退役纪念章
日期:2018-03-07 11:23:33
发表于 2018-11-15 18:12 |显示全部楼层
http://perldoc.perl.org/perlintro.html
The special variable $#array tells you the index of the last element of an array:

论坛徽章:
0
发表于 2018-11-15 20:48 |显示全部楼层
本帖最后由 hztj2005 于 2018-11-19 13:57 编辑

按楼上的:如果数组contig有10个元素,$#contig这个特殊变量就是9。如果数组contig有38个元素,$#contig这个特殊变量就是37.
总而言之,perl内部设置的:数组名前面加上$#这么一个特殊变量记录数组的大小。
@myarray = (11, 22, 37,48,52);

那么$#myarray就是 4.

您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

数据风云,十年变迁
DTCC 第十届中国数据库技术大会已启航!

2019年5月8日~5月10日,由IT168旗下ITPUB企业社区平台主办的第十届中国数据库技术大会(DTCC2019),将在北京隆重召开。大会将邀请百余位行业专家,就热点技术话题进行分享,是广大数据领域从业人士的又一次年度盛会和交流平台。与SACC2018类似,本届大会将采用“3+2”模式:3天传统技术演讲+2天深度主题培训。大会不仅提供超100场的主题演讲,还会提供连续2天的深度课程培训,深化数据领域的项目落地实践方案。
DTCC2019,一场值得期待的数据技术盛会,殷切地希望您报名参与!

活动入口>>
  

北京盛拓优讯信息技术有限公司. 版权所有 16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122
中国互联网协会会员  联系我们:huangweiwei@it168.com
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP