Select Code to Download

my %hashA = ( orange=>'good',
              apple=>'bad' );
...
  $hashrefA->{extravalue} = "change seen in the main program";

}