$_ = "0369cf" x 3;
print "#$1$1$2$2$3$3\n" while /.*(.).*(.).*(.)(?(?{$h{"$1$2$3"}++})^)/;