I don't really understand why you've chosen to use grep here instead of map. With grep you'll lose any elements where the substitution didn't change anything.

my @fields = qw/this is the_other/;

@fields = grep { s/t/j/ } @fields;

print "@fields"; # prints "jhis jhe_other" (losing "is")
[download]