@new = map { ... } @{[ @original ]};

##</code><code>##

@new = grep { local $_ = $_; ... } @original;

##</code><code>##

... for @new = @original;

##</code><code>##

do { ...; ... } for @new = @original;