in reply to Re: Better Way of Manipulating Array Elements
in thread Better Way of Manipulating Array Elements

Alternate fix: 
use List::MoreUtils qw( apply );

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

[download]

In Section Seekers of Perl Wisdom