$color[$_] = sprintf "#%02x%02x%02x", rand 255, rand 255, rand 255 for 0..4;