in reply to How about coloured names based on xp's?

Either that or additionally a possibility to create your own "Level to colour mapping".
s$$([},&%#}/&/]+}%&{})*;#$&&s&&$^X.($'^"%]=\&(|?*{%
+.+=%;.#_}\&"^"-+%*).}%:##%}={~=~:.")&e&&s""`$''`"e

In Section Perl Monks Discussion