PERL语言入门:第三章:列表与数组:访问数组元素与特殊索引

#!/usr/bin/perl -w
#下面定义了三个数组
$test[0] = 'black';
$test[1] = "gteen";
$test[2] = "red";
print qq/打印自定义的三个数组:\n/;
print "@test\n";
print @test,"\n";
#上面的打印, 说明加""与不加是有区别的, 加了的话默认在元素中加空格

print q/打印$test[10]的结果:/;
print "$test[10]";
if (defined($test[10])){
        print "not undef\n";
}
else{
        print "undef\n"
}

#结果为未定义的undef

#以上定义了$test[10], 所以数组自动扩充为11个元素, 没有指定值的自动被赋为undef
print "数组的元素个数为:";
$count = $#test+1;
print $count, "\n";
#对于数组@test, 最后一个元素的索引为$#test, 所以$#test+1为数组的长度
~                                                                                                               
~                                                                                                               
~               

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值