Searched refs:IS_PRE_516_PERL (Results 1 – 1 of 1) sorted by relevance
20 use constant IS_PRE_516_PERL => $] < 5.016; constant526 … local $s->{useqq} = IS_PRE_516_PERL && ($s->{useqq} || $name =~ /[^\x00-\x7f]/) ? 1 : $s->{useqq};