table.perl_mode pre {
    background-color: #FFF;
}
table.perl_mode td {
    border: 0;
}
.pd { color: #404080;} /* pod-text */
.c  { color: #404080;} /* comment */
.cm { color: #800097;} /* comma */
.co { color: #800097;} /* colon */
.h  { color: #804848;} /* here-doc-target */
.hh { color: #800000;} /* here-doc-text */
.q  { color: #800000;} /* quote */
.v  { color: #800000;} /* v-string */
.i  { color: #008080;} /* identifier */
.k  { color: #0000FF;} /* keyword */
.n  { color: #E02020;} /* numeric */
.m  { color: #C00080;} /* subroutine */
.j  { color: #C00080;} /* label */
.w  { color: #C00080;} /* bareword */
.p  { color: #800080;} /* paren */
.s  { color: #800080;} /* structure */
.sc { color: #800080;} /* semicolon */
.pu { color: #C44800;} /* punctuation */