perl: bundled features in older version

diff --git a/perl.inc.pl b/perl.inc.pl
index 3ee4eb4cf11dbee227e1a0ced20c10b81ec73164..b0f9ec853283b643e211381dd8b83d94e11ad624 100644 (file)
--- a/perl.inc.pl
+++ b/perl.inc.pl
@@ -107,10 +107,11 @@ my $wbr = "\N{ZERO WIDTH SPACE}";
 
        v5.10 => {
                new => [
 
        v5.10 => {
                new => [

+                       ['<code>use v5.10</code>', 'minimal perl version with bundled features (pragma to lexically enable backwards-incompatible syntax)'],

                        ['<code>//</code>', 'defined-or operator'],
                        ['<code>~~</code>', 'smart-match operator to compare different data types <small>(updated in v5.10.1)</small>', {experimental => 'smartmatch'}],
                        ['<code>//</code>', 'defined-or operator'],
                        ['<code>~~</code>', 'smart-match operator to compare different data types <small>(updated in v5.10.1)</small>', {experimental => 'smartmatch'}],

-                       ['<code>say</code>', 'print with newline, equivalent to <code>print @_, "\n"</code>', {feature => 'say'}],
-                       ['<code>given</code>', 'switch statement to smart-match with <code>when</code>/<code>default</code>', {name => 'switch', feature => 'switch', experimental => 'smartmatch'}],
+                       ['<code>say</code>', 'print with newline, equivalent to <code>print @_, "\n"</code>', {feature => 'say', bundle => 0}],
+                       ['<code>given</code>', 'switch statement to smart-match with <code>when</code>/<code>default</code>', {name => 'switch', feature => 'switch', bundle => 0, experimental => 'smartmatch'}],

                        ['<code>/(?&lt;name>)/</code>', 'named capture buffers into <code>%+</code>'],
                        ['<code>/(?1)/</code>', 'recursive regular expression patterns'],
                        ['<code>/(?|)/</code>', 'resets capture numbering for each contained branch'],
                        ['<code>/(?&lt;name>)/</code>', 'named capture buffers into <code>%+</code>'],
                        ['<code>/(?1)/</code>', 'recursive regular expression patterns'],
                        ['<code>/(?|)/</code>', 'resets capture numbering for each contained branch'],


@@ -119,7 +120,7 @@ my $wbr = "\N{ZERO WIDTH SPACE}";
                        ['<code>/p</code>', 'optionally preserve <code>${^MATCH}</code> variables (avoiding <code>$&</code> penalty until COW in v5.20)'],
                        ['<code>/\v/, /\h/</code>', 'vertical and horizontal whitespace escapes (<code>\V</code> <code>\H</code> to invert); also <code>/\R/</code> for newlines'],
                        ['<code>my $_</code>', 'lexically scoped version of the default variable', {experimental => 'lexical_topic', dropped => v5.23.4}],
                        ['<code>/p</code>', 'optionally preserve <code>${^MATCH}</code> variables (avoiding <code>$&</code> penalty until COW in v5.20)'],
                        ['<code>/\v/, /\h/</code>', 'vertical and horizontal whitespace escapes (<code>\V</code> <code>\H</code> to invert); also <code>/\R/</code> for newlines'],
                        ['<code>my $_</code>', 'lexically scoped version of the default variable', {experimental => 'lexical_topic', dropped => v5.23.4}],

-                       ['<code>state</code>', 'persistent <code>my</code> variables (scalars only until <a href="#state_ext">5.28</a>)', {feature => 'state'}],
+                       ['<code>state</code>', 'persistent <code>my</code> variables (scalars only until <a href="#state_ext">5.28</a>)', {feature => 'state', bundle => 0}],

                ],
                modules => [
                        [autodie => 'replace builtin functions to throw exceptions instead of returning failure', 'eval {open ...} or $@->matches("open") || die'],
                ],
                modules => [
                        [autodie => 'replace builtin functions to throw exceptions instead of returning failure', 'eval {open ...} or $@->matches("open") || die'],


@@ -193,8 +194,8 @@ my $wbr = "\N{ZERO WIDTH SPACE}";
        v5.16 => {
                new => [
                        ["<code>no feature ${wbr}'array_base'</code>", 'disables <code>$[</code> to alter the 0 index of the first array element or substring character', {bundle => 0, dropped => v5.30}],
        v5.16 => {
                new => [
                        ["<code>no feature ${wbr}'array_base'</code>", 'disables <code>$[</code> to alter the 0 index of the first array element or substring character', {bundle => 0, dropped => v5.30}],

-                       ['<code>__SUB__</code>', 'current subroutine reference', {feature => 'current_sub'}],
-                       ['<code>fc, "\F"</code>', 'unicode foldcase to compare case-insensitively', {feature => 'fc'}],
+                       ['<code>__SUB__</code>', 'current subroutine reference', {feature => 'current_sub', bundle => 0}],
+                       ['<code>fc, "\F"</code>', 'unicode foldcase to compare case-insensitively', {feature => 'fc', bundle => 0}],

                        ['<code>"\N{}"</code>', 'automatic <code>use charnames qw( :full :short )</code>'],
                ],
                release => '2012-05-20',
                        ['<code>"\N{}"</code>', 'automatic <code>use charnames qw( :full :short )</code>'],
                ],
                release => '2012-05-20',


@@ -229,7 +230,7 @@ my $wbr = "\N{ZERO WIDTH SPACE}";
                new => [
                        ['<code>sub ($var)</code>', 'subroutine signatures', {feature => 'signatures', experimental => 'signatures', stable => v5.36, bundle => 0}],
                        ['<code>%hash{…}</code>', 'hash slices return key+value pairs'],
                new => [
                        ['<code>sub ($var)</code>', 'subroutine signatures', {feature => 'signatures', experimental => 'signatures', stable => v5.36, bundle => 0}],
                        ['<code>%hash{…}</code>', 'hash slices return key+value pairs'],

-                       ['<code>[]->@*</code>', 'postfix dereferencing (also e.g. <code>$scalar->$*</code> for <code>$$scalar</code>)', {feature => 'postderef, postderef_qq', experimental => 'postderef', stable => v5.23.1}],
+                       ['<code>[]->@*</code>', 'postfix dereferencing (also e.g. <code>$scalar->$*</code> for <code>$$scalar</code>)', {feature => 'postderef, postderef_qq', experimental => 'postderef', stable => v5.24, bundle => 0}],

                        [q"<code>use warnings 'once'; $a</code>", 'variables $a and $b are exempt from <em>used once</em> warnings'],
                ],
                unicode => '6.3',
                        [q"<code>use warnings 'once'; $a</code>", 'variables $a and $b are exempt from <em>used once</em> warnings'],
                ],
                unicode => '6.3',


@@ -250,7 +251,7 @@ my $wbr = "\N{ZERO WIDTH SPACE}";
                        ['<code>&lt;&lt;…>></code>', 'safe <code>readline</code> ignoring open flags in arguments'],
                        ['<code>/()/n</code>', 'flag to disable numbered capturing, turning <code>()</code> into <code>(?:)</code>'],
                        ['<code>/\b{}/</code>', 'boundary types: <em>gcb</em> (grapheme cluster), <em>sb</em> (sentence), <em>wb</em> (word)'],
                        ['<code>&lt;&lt;…>></code>', 'safe <code>readline</code> ignoring open flags in arguments'],
                        ['<code>/()/n</code>', 'flag to disable numbered capturing, turning <code>()</code> into <code>(?:)</code>'],
                        ['<code>/\b{}/</code>', 'boundary types: <em>gcb</em> (grapheme cluster), <em>sb</em> (sentence), <em>wb</em> (word)'],

-                       ['<code>&.</code>', '<code>& | ^ ~</code> consistently numeric, dotted operators for strings', {feature => 'bitwise', experimental => 'bitwise', stable => v5.28}],
+                       ['<code>&.</code>', '<code>& | ^ ~</code> consistently numeric, dotted operators for strings', {feature => 'bitwise', experimental => 'bitwise', stable => v5.28, bundle => 0}],

                        [q"<code>use re 'strict'</code>", 'apply stricter syntax rules to regular expression patterns', {experimental => 're_strict'}],
                        ['<code>0x.beep+0</code>', q"hexadecimal floating point notation with binary power; <code>printf '%a'</code> to display"],
                        ['<code><s>??</s></code>', 'single match shorthand (deprecated since v5.14) requires the operator <code><em>m</em>?PATTERN?</code>'],
                        [q"<code>use re 'strict'</code>", 'apply stricter syntax rules to regular expression patterns', {experimental => 're_strict'}],
                        ['<code>0x.beep+0</code>', q"hexadecimal floating point notation with binary power; <code>printf '%a'</code> to display"],
                        ['<code><s>??</s></code>', 'single match shorthand (deprecated since v5.14) requires the operator <code><em>m</em>?PATTERN?</code>'],