delete @core{qw<my local>};
BEGIN {
- *_REFCNT_PLACEHOLDERS = eval 'sub () { ' . ("$]" < 5.011002 ? 0 : 1) . '}'
+ *_REFCNT_PLACEHOLDERS = eval 'sub () { ' . ("$]" < 5.011_002 ? 0 : 1) . '}'
}
my $tag = wizard data => sub { \(my $data = _REFCNT_PLACEHOLDERS ? 2 : 1) };
L<B::Keywords>.
-L<Carp> (standard since perl 5), L<XSLoader> (since 5.006).
+L<Carp> (standard since perl 5), L<XSLoader> (since 5.6.0).
=head1 AUTHOR