my $color = $colors[rand @colors];