package main;

my $yel = new Apple;
$yel->{color} ='yellow';

##</code><code>##

    $yel->set_color('yellow');