my @color= qw(  lavender lightblue honeydew);
my $color_no=int(rand($#color));
return $color[$color_no];