This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
make overload respect get magic
[perl5.git] / lib / feature.pm
index 5802f00..3cf838a 100644 (file)
@@ -1,6 +1,6 @@
 package feature;
 
-our $VERSION = '1.14';
+our $VERSION = '1.17';
 
 # (feature name) => (internal name, used in %^H)
 my %feature = (
@@ -12,6 +12,7 @@ my %feature = (
 
 # This gets set (for now) in $^H as well as in %^H,
 # for runtime speed of the uc/lc/ucfirst/lcfirst functions.
+# See HINT_UNI_8_BIT in perl.h.
 our $hint_uni8bit = 0x00000800;
 
 # NB. the latest bundle must be loaded by the -E switch (see toke.c)
@@ -19,6 +20,8 @@ our $hint_uni8bit = 0x00000800;
 my %feature_bundle = (
     "5.10" => [qw(switch say state)],
     "5.11" => [qw(switch say state unicode_strings)],
+    "5.12" => [qw(switch say state unicode_strings)],
+    "5.13" => [qw(switch say state unicode_strings)],
 );
 
 # special case