my @items = qw(1 2 3 4 5 6);
my $val = 10;
$val += $_
    for @items;