foreach(@array){
      my $item = $_;
      ...