Perl fontification problem