From: Vincent Pit <vince@profvince.com>
Date: Sat, 24 Aug 2013 18:28:46 +0000 (-0300)
Subject: Make Perl version numbers more readable
X-Git-Tag: v0.08~3
X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=36d43b44c6e3691cf0d34500c6f00c4676738756;p=perl%2Fmodules%2Fsubs-auto.git

Make Perl version numbers more readable
---

diff --git a/lib/subs/auto.pm b/lib/subs/auto.pm
index d92f17a..81ae297 100644
--- a/lib/subs/auto.pm
+++ b/lib/subs/auto.pm
@@ -87,7 +87,7 @@ my %core;
 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) };
@@ -256,7 +256,7 @@ L<Variable::Magic> with C<uvar> magic enabled (this should be assured by the req
 
 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