arrays - 用于打印数组的 Perl 函数

Question

Perl5 是否有一个默认函数可以大致做到这一点:

map {print $array[$_]} qw/1 5 7/; # i don't care about 2, 3, 4, 6 and whatever next indexes

一个函数而不是三个？

Answer 1

怎么样，

print @array[qw/1 5 7/] ;

在 perl 中，有十种方法可以做任何事情。