$obj->{color} = 'blue'; print Dumper($obj); #### 22:39 >perl 1424_SoPW.pl $VAR1 = bless( { 'name' => 'apple', 'color' => 'green' }, 'Fruit' ); $VAR1 = bless( { 'name' => 'apple', 'color' => 'blue' }, 'Fruit' ); 22:40 >