Select Code to Download

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

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

... for @new = @original;

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