my @result = map some_sub($_), qw(a b c d);