Refine regexp colors for perl