Select Code to Download

 $hash{'food'} = 'Apple';
 $hash{'food'}{'color'} = 'Red';

 print "$hash{'food'}{'color'} $hash{'food'}\n";

 $hash{'food'}{'color'} = 'Red';
 $hash{'food'} = 'Apple';

 $hash1{'food'}{'color'} = 'Red';
 $hash1{'food'} = 'Apple';
...
 print "hash1: $hash1{'food'}{'color'} $hash1{'food'}\n";
 print "hash2: $hash2{'food'}{'color'} $hash2{'food'}\n";

 $hash1{'food'} = 'Apple';
 $hash1{'food'}{'color'} = 'Red';
...
 print "hash1: $hash1{'food'}{'color'} $hash1{'food'}\n";
 print "hash2: $hash2{'food'}{'color'} $hash2{'food'}\n";