如何在PERL中打印整个数组

Question

如何在PERL中打印整个数组

Answer 1

方法：
my @array = (0, 1, 2, 3);
print (“@array\n”); #输出有空格，如：0 1 2 3
print (@array, “\n”); #输出没空格，如：0123

哈希也可以用同样方法，如：
my %hash = ();
$hash{a} = ‘jeftom';
$hash{b} = ‘design';
print (%hash);

Answer 2

打印数组一般有三种方法： 方法一：print "@array\n"; 方法二：for $row (@array) { print "@$row\n";}方法三：for $row (0..$#array) { 方法二和方法三的输出结果：cubsredsyankeesdodgers