foreach (@fruit{'apple','banana','plum'}){$_=1}

##</code><code>##

#This will NOT work as intended
$value="'apple','banana','plum'";
foreach (@fruit{$value}){$_=1}
#doesn't work!  

##</code><code>##

@array=("apple","banana");
push @array, "plum";
foreach (@array){$fruit{$_}=1}

##</code><code>##

foreach (@array){$fruit{$_}=1} # initialize fruit set