@selected = grep EXPR, @input;
@selected = map { if (EXPR) { $_ } } @input;

##</code><code>##

@transformed = map EXPR, @input;

##</code><code>##

foreach (@input) { push @transformed, EXPR; }