Perl——二维数组

前端之家收集整理的这篇文章主要介绍了Perl——二维数组前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
@array = ("abc","ewr");
print @array[1],"\n"; 

#二维数组
#定义
@array_array = (["abc","ewr"],["sdfdf","uu","wewew"],["fd"]);

print $array_array[1][1],"\n"; #uu
print $array_array[1][-2],"\n"; #uu
print "--------------------------------","\n";
#给第二行添加列
push @{ $array_array[1]},"uiop";
print $array_array[1][-1],"\n"; # uiop
print "--------------------------------","\n";
#添加新的行
push @array_array,["hjk","jjkkk"];
print $array_array[3][-1],"\n"; # jjkkk
print "--------------------------------","\n";

#二维数组引用
$ref_array_array = [["abc",["fd"]];
print $ref_array_array -> [1][1],"\n"; #uu

猜你在找的Perl相关文章