mik*_*ike 19 arrays perl slice
获取Perl数组的最后N个元素的最佳方法是什么？
如果数组小于N,我不希望undefs在返回值中有一堆.
cha*_*aos 39
@last_n = @source[-$n..-1];
如果你不需要undefs,那么:
@last_n = ($n >= @source) ? @source : @source[-$n..-1];