print join ", ", map { chomp; s/(d)/new(\1)/ } @a;