perl程序中shift怎么用

这篇文章将为大家详细讲解有关perl程序中shift怎么用，小编觉得挺实用的，因此分享给大家做个参考，希望大家阅读完这篇文章后可以有所收获。

perl程序中shift的用法

shift ARRAY
shift

这个函数把数组的第一个值移出并且返回它，然后把数组长度减一并且把所有的东西都顺移。如果在数组中不再存在元素，它返回 undef。

如果省略了 ARRAY，那么该函数在子过程和格式的词法范围里移动 @_；
它在文件范围（通常是主程序）里移动 @ARGV。

子过程通常以拷贝它们的参数到词法变量里开始，而 shift 可以用于这个目的：

sub marine {      my $a1 = shift;   # 第一个元素      my $a2 = shift;   #  第二个元素      my $a3 = shift;   #  第一个元素      # ...   }

关于"perl程序中shift怎么用"这篇文章就分享到这里了，希望以上内容可以对大家有一定的帮助，使各位可以学到更多知识，如果觉得文章不错，请把它分享出去让更多的人看到。