摘要： 1.Perl数组(1): 1) 初始化数组 @array = ( "stringA" , "stringB" , "stringC" ); 2) 使用负索引循环检索　print $array[-1]; #输出索引为(-1 + 3) % 3 = 2 的 stringC 3) 动态增长 $array[4] = "stringD"; #虽然$array[3]还没有使用，但在动态赋值$array[4]的使用，已经对$array[3]赋空置 4) 动态增长后的负索引 print $array[-1]; #输出索引为(-1 + 阅读全文