in reply to Golfing Colors

I was inspired to take a rather unique approach. Not really golfing, but:
$_ = "0369cf" x 3; print "#$1$1$2$2$3$3\n" while /.*(.).*(.).*(.)(?(?{$h{"$1$2$3"}++})^)/ +;
   MeowChow                                   
               s aamecha.s a..a\u$&owag.print