$1$fruitcolors{$2}$3

##</code><code>##

  s/(apple)(banana)(chocolate)/$1 . $fruitcolors{$2} . $3/ie;