my @values = map { s/dc=domain,dc=tld/dc=sub,dc=otherdomain,dc=tld/ir } @$array_ref;

##</code><code>##

perl -E '
@ary =( "abc", "cbc", "dbd" ); say for map { s/b/FOO/r } @ary;
'
aFOOc
cFOOc
dFOOd