perl语言foreach用法

　　Perl foreach用法
　　Perl foreach从列表（数组）的第一个元素一直循环执行到最后一个元素，一次迭代一个。控制变量（本例中为$rock）每一次迭代从列表中取出一个新值。第一次为“bedrock”,第三次为“lava”。控制变量不是这些列表元素中的一个拷贝而是这些元素本身。也就是说，如果在循环中修改这个变量，那原始列表中的元素也会被修改，如下面代码段所显示。这条性质是有用的，但是，如果不清楚，可能对其结果感到吃惊。
　　当循环结束时$rock的值同循环开始之前相同。Perl foreach循环中控制变量的值会被Perl自动保存和恢复。当循环进行时，是没有办法改变其值的。循环结束时，变量的值会回到循环开始前，如果没有值则为undef。这意味着如果有一个变量和控制变量有相同的名字：“$rock”，不用担心会混淆它们。

你在遍历列表的同时，改变了列表（shift删除了列表中的元素），导致遍历并没有遍历所有元素。

所以你应该用

  foreach (@_)
     {
     $sum=$sum+$_ ;
     }

    print  "$sum.\n";

Jmeter是一款于java公司开发的接口和性能测试工具，学好Jmeter可以有效帮助我们提高软件测试工作效率