0
不执行,我有以下脚本的Perl - 代码预期
print ("\n\n=========================================\n");
@array = (1,2,"Hello");
print("\$array[0] = $array[0]\n");
print("\$array[1] = $array[1]\n");
print("\$array[2] = $array[2]\n");
@array =(a..z);
**print("\@array[5..10][email protected](5,3..10,24");**
@[email protected];
print "The lenght of\@array is:@lenght\n";
print ("=========================================\n\n");.
双**
标记是我没有得到预期的输出。请帮我解决这个问题。
我很期待的输出是这样的d,e,f,h,k
像这样
'$#'sigill用于查找数组中最后一个元素的索引。在标量上下文中使用数组本身来查找长度:'$ length = @ array'。 – TLP 2015-01-04 13:09:47
另外,'a..z'依赖于裸字。它应该是'a'..'z''。 – TLP 2015-01-04 13:11:06