将 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

更新于： 2019 年 11 月 29 日

1K+ 浏览

开启你的 职业生涯

完成课程获得认证

开始
广告