我有一个像这样的数组:
my @array = qw( zero one two three four five six seven eigth nine);
如何从 @array 输出由长度为 4 的字符串组成的子数组。例如,如果字符串等于 4,则新数组将输出为@subarray = ( zero four five nine )
@subarray = ( zero four five nine )
perl
perl ×1