Fix Perl conceal