foreach $_ (@e) { $foo += $_; } #### $foo += $_ if $x < $foo;