my @newlist = map { $_*2 } @list; my @list; my @newlist; for my $item( @list) { push @newlist, $item * 2; }