YEUNGCHIE

摘要： https://www.cnblogs.com/yeungchie/ 函数功能 Perl 中 shift 函数可以返回列表的第一个元素，并将后续所有元素向前移位（ 索引值减 1 ）。输入可选，默认为 @_ 或者 @ARGV。 my @foo = qw( 1 2 3 4 ); say shift @f 阅读全文