my @output = map {
        my $temp = $_;
        $temp =~ s/some/subst/g;
        $temp
    } @input;