在Perl中合并数组
由于Perl中的数组只是逗号分隔的值序列,因此可以将它们组合在一起,如下所示-
示例
#!/usr/bin/perl @numbers = (1,3,(4,5,6)); print "numbers = @numbers\n";
输出结果
这将产生以下结果-
numbers = 1 3 4 5 6
嵌入式数组仅成为主数组的一部分,如下所示-
示例
#!/usr/bin/perl @odd = (1,3,5); @even = (2, 4, 6); @numbers = (@odd, @even); print "numbers = @numbers\n";
输出结果
这将产生以下结果-
numbers = 1 3 5 2 4 6