Change mycolor for perl syntax highlight