browser: fix error message of missing usage include
[sheet.git] / perl.inc.pl
index 7b50cefdaa3f55a73ec6b21e0379ddc24e344a42..f6f2b3ff0a546dc1d7942525aac0520130abd2af 100644 (file)
@@ -76,7 +76,7 @@ my $wbr = "\N{ZERO WIDTH SPACE}";
                ],
                modules => [
                        [bignum => 'transparent big number support', 'length 1e100 == 101'],
-                       [if => 'conditional module inclusion', 'no if $] >= 5.022, "warnings", "redundant"'],
+                       [if => 'conditional module inclusion', 'no if $] >= 5.022, "warnings", "redundant"'],
                        [sort => 'override sort() algorithm', {dropped => v5.28, eg => 'sort::current eq "stable"'}],
                        [Digest => 'calculate various message digests (data hashes)', '$hash = sha256_hex($data)'],
                        [Encode => 'character set conversion', 'encode("utf8", decode("iso-8859-1", $octets))'],
@@ -86,7 +86,7 @@ my $wbr = "\N{ZERO WIDTH SPACE}";
                        ['Memoize' => 'remember function results, trading space for time', 'memoize "stat"'],
                        ['MIME::Base64' => 'base64 encoded strings as in email attachments'],
                        ['Test::More' => 'modern framework for unit testing', 'is $got, $expected'],
-                       ['Time::HiRes' => 'high resolution timers', '$μs = [gettimeofday]; sleep .1;'.$wbr.' $elapsed = tv_interval $μs'],
+                       ['Time::HiRes' => 'high resolution timers', '$μs = [gettimeofday]; sleep .1;'.$wbr.' $elapsed = tv_interval $μs'],
                ],
                release => '2002-07-18',
                distro => {
@@ -122,9 +122,9 @@ my $wbr = "\N{ZERO WIDTH SPACE}";
                        ['<code>state</code>', 'persistent <code>my</code> variables (scalars only until <a href="#state_ext">5.28</a>)', {feature => 'state'}],
                ],
                modules => [
-                       [autodie => 'replace builtin functions to throw exceptions instead of returning failure', 'eval {open ...} or $@->matches("open") || die'],
+                       [autodie => 'replace builtin functions to throw exceptions instead of returning failure', 'eval {open ...} or $@->matches("open") || die'],
                        # overloading
-                       ['IO::Compress::Zip' => 'various file compression standards', 'zip IO::Uncompress::Gunzip->new("test.gz")'.$wbr.' => "recompressed.zip"'],
+                       ['IO::Compress::Zip' => 'various file compression standards', 'zip IO::Uncompress::Gunzip'.$wbr.'->new("test.gz")'.$wbr.' => "recompressed.zip"'],
                        ['Time::Piece' => 'timestamps as objects', 'localtime->year > 1900'],
                        ['File::Fetch' => 'generic data retrieval/download', 'File::Fetch->new(uri => "http://localhost/")'.$wbr.'->fetch(to => \$slurp)'],
                ],
@@ -212,7 +212,7 @@ my $wbr = "\N{ZERO WIDTH SPACE}";
                        ['<code>/(?[ a + b ])/</code>', 'regex set operations (character subtraction <code>-</code>, union <code>+</code>, intersection <code>&amp;</code>, xor <code>^</code>)', {experimental => 'regex_sets', stable => v5.36}],
                        ['<code>my sub</code>', 'lexical subroutines (also <code>state</code>, <code>our</code>); buggy before v5.22', {experimental => 'lexical_subs', stable => v5.26}],
                        ['<code>next $expression</code>', 'loop controls allow runtime expressions'],
-                       [q"<code>no warnings 'experimental::…'</code>", 'mechanism for experimental features, as of now required for <em>smartmatch</em>'],
+                       [q"<code>no warnings 'experimental::…'</code>", 'mechanism for experimental features, as of now required for <a href="#switch">smartmatch</a>'],
                ],
                release => '2013-05-18',
                distro => {
@@ -225,7 +225,7 @@ my $wbr = "\N{ZERO WIDTH SPACE}";
 
        v5.20 => {
                new => [
-                       ['<code>sub ($var)</code>', 'subroutine signatures', {feature => 'signatures', experimental => 'signatures', stable => v5.36}],
+                       ['<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}],
                        [q"<code>use warnings 'once'; $a</code>", 'variables $a and $b are exempt from <em>used once</em> warnings'],
@@ -245,14 +245,15 @@ my $wbr = "\N{ZERO WIDTH SPACE}";
        v5.22 => {
                new => [
                        ['<code>\$alias =</code>', 'aliasing via reference (scoped as of v5.25.3)', {experimental => 'refaliasing'}],
-                       ['<code>&lt;&lt;>></code>', 'safe <code>readline</code> ignoring open flags in arguments'],
+                       ['<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}],
                        [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>'],
-                       ['<code><s>use CGI</s></code>' => 'deprecated interface for serving http requests removed from core, see CGI::Alternatives', {name => 'cgi'}],
+                       ['<code><s>use CGI</s></code>' => 'deprecated interface for serving http requests removed from core'
+                       .', see <a href="https://metacpan.org/pod/CGI::Alternatives" target=_blank>CGI::Alternatives</a>', {name => 'cgi'}],
                ],
                unicode => '7.0',
                release => '2015-06-01',
@@ -335,11 +336,11 @@ my $wbr = "\N{ZERO WIDTH SPACE}";
 
        v5.32 => {
                new => [
-                       ['<code>isa</code>', 'infix operator to check class instance', {feature => 'isa', experimental => 'isa', stable => v5.36}],
-                       ['<code>$min &lt; $_ &lt;= $max</code>', 'chained comparison repeats inner part as <code>$min &lt; $_ and $_ &lt;= $max</code>'],
+                       ['<code>isa</code>', 'infix operator to check class instance', {feature => 'isa', experimental => 'isa', stable => v5.36, bundle => 0}],
+                       ['<code>$min &lt; $_ &lt;= $max</code>', 'chained comparison repeats inner part as <code>$min &lt; $_ and $_ &lt;= $max</code>'],
                        ['<code>/\p{Name=$var}/</code>', 'match Unicode Name property like <code>\N{}</code> but with interpolation and subpatterns'],
                        [q"<code>open F, '+&gt;&gt;', undef</code>", 'respect append mode on temporary files with mixed access'],
-                       ["<code>no feature 'indirect'</code>", 'disable indirect object notation such as <code>new Class</code> instead of <code>Class-&gt;new</code>'],
+                       ["<code>no feature 'indirect'</code>", 'disable indirect object notation such as <code>new Class</code> instead of <code>Class-&gt;new</code>', {name => 'indirect', bundle => v5.36}],
                        ['streamzip', 'program distributed with core IO::Compress::Base to compress stdin into a zip container'],
                ],
                unicode => '13.0',
@@ -357,12 +358,12 @@ my $wbr = "\N{ZERO WIDTH SPACE}";
 
        v5.34 => {
                new => [
-                       ['<code>try {} catch</code>', 'exception handling similar to eval blocks', {feature => 'try', experimental => 'try'}],
+                       ['<code>try {} catch</code>', 'exception handling similar to eval blocks', {feature => 'try', experimental => 'try', stable => v5.40, bundle => 0}],
                        ['<code>/{,<i>n</i>}/</code>', 'empty lower bound quantifier is accepted as shorthand for 0'],
                        ['<code>\x{ … }</code>', 'insignificant space within curly braces, also for <code>\b{}</code>, <code>\g{}</code>, <code>\k{}</code>, <code>\N{}</code>, <code>\o{}</code> as well as <code>/{m,n}/</code> quantifiers'],
                        ['<code>0o0</code>', 'octal prefix <code>0o</code> alternative to <code>0…</code> and <code>oct</code>'],
-                       ['<code>re::optimization(qr//)</code>', 'debug regular expression optimization information discovered at compile time'],
-                       ['<code>no feature …</code>', 'disable discouraged practices of <code>bareword_filehandles</code> and <code>multidimensional</code> array emulation'],
+                       ["<code>re::optimization(${wbr}qr//)</code>", 'debug regular expression optimization information discovered at compile time'],
+                       ['<code>no feature …</code>', 'disable discouraged practices of <code>multidimensional</code> and <code>bareword_filehandles</code> array emulation', {name => 'feature_534', bundle => [v5.36, v5.38]}],
                ],
                release => '2021-05-20',
                distro => {
@@ -373,12 +374,12 @@ my $wbr = "\N{ZERO WIDTH SPACE}";
 
        v5.36 => {
                new => [
-                       ['<code>use v5.36</code>', "use <code>warnings</code>; use feature qw'<code>signatures isa</code>'; no feature qw'<code>indirect multidimensional switch</code>'"],
-                       ['<code>use builtin</code>', 'namespace for interpreter functions, such as <code>weaken</code> and <code>blessed</code> from <code>Scalar::Util</code>, <code>ceil</code>/<code>floor</code> from <code>POSIX</code>, and <code>trim</code> like <code>String::Util</code>', {experimental => 'builtin'}],
+                       ['<code>use v5.36</code>', q{use <code><a href="#warnings">warnings</a></code>; use feature qw'<code><a href="#signature">signatures</a> <a href="#isa">isa</a></code>'; no feature qw'<code><a href="#indirect">indirect</a> <a href="#feature_534">multidimensional</a> <a href="#switch">switch</a></code>'}],
+                       ['<code>use builtin</code>', 'namespace for interpreter functions, such as <code>weaken</code> and <code>blessed</code> from <code>Scalar::Util</code>, <code>ceil</code>/<code>floor</code> from <code>POSIX</code>, and <code>trim</code> like <code>String::Util</code>', {experimental => 'builtin', stable => v5.40, bundle => 0}],
                        ['<code>is_bool(!0)</code>', 'distinguish scalar variable types (by <code>builtin</code> functions) for data interoperability', {name => 'is_bool'}],
-                       ['<code>for my ($k, $v) (%hash)</code>', 'iterate over multiple values at a time (including <code>builtin::indexed</code> for arrays)', {experimental => 'for_list', feature => 'for_list'}],
+                       ['<code>for my ($k, $v) (%hash)</code>', 'iterate over multiple values at a time (including <code>builtin::indexed</code> for arrays)', {experimental => 'for_list', feature => 'for_list', stable => v5.40}],
                        ['<code>defer {}</code>', 'queue code to be executed when going out of scope', {feature => 'defer', experimental => 'defer'}],
-                       ['<code>try {} finally {}</code>', 'run code at the end of a <code><a href="#try">try</a></code> construct regardless of failure', {name => 'finally', feature => 'try', experimental => 'try'}],
+                       ['<code>try {} finally {}</code>', 'run code at the end of a <code><a href="#try">try</a></code> construct regardless of failure', {name => 'finally', feature => 'try', experimental => 'try', stable => 0}], # not stable in v5.40
                        ['<code>q«…»</code>', 'unicode delimiters for quoting operators', {experimental => 'extra_paired_delimiters'}],
                        ['<code>sub ($var) {!<s>pop</s>}</code>', '<a href="#signatures">signature</a>d subs are stable, but mixing with the arguments array <code>@_</code> remains experimental', {feature => 'signatures', experimental => 'args_array_with_signatures'}],
                        ['<code>$SIG{FPE}</code>', 'floating-point exceptions no longer deferred but delivered immediately like other signals', {name => 'sig_fpe'}],
@@ -394,9 +395,9 @@ my $wbr = "\N{ZERO WIDTH SPACE}";
 
        v5.38 => {
                new => [
-                       ['<code>use feature "module_true"</code>', 'default in use 5.37 and up, also <code>no feature "bareword_filehandles"</code>'],
+                       ['<code>use feature "module_true"</code>', 'packages implicitly return true, enabled along with <code>no feature "<a href="#feature_534">bareword_filehandles</a>"</code>', {name => 'module_true', bundle => 0}],
                        ['<code>sub ($var ||=</code> default<code>)</code>', 'assign values when false (or undefined on <code>//=</code>) instead of omitted'],
-                       ['<code>/(*{ … })/</code>', 'optimistic eval: <code>(?{ … })</code> with regex optimisations enabled'],
+                       ['<code>/(*{ … })/</code>', 'optimistic eval: <code>(?{ … })</code> with regex optimisations enabled'],
                        ['<code>class</code>', "define object classes: packages with <code>field</code> variables and <code>method</code> subroutines", {feature => 'class', experimental => 'class'}],
                        ['<code>${^LAST_<wbr>SUCCESSFUL_<wbr>PATTERN}</code>', 'explicit variable to access the previous match as in <code>s//…/</code>'],
                        ['<code>%{^HOOK}</code>', "perform tasks <code>require__before</code> and <code>require__after</code> when calling <code>require</code>"], # also @INC hook enhancements
@@ -407,4 +408,20 @@ my $wbr = "\N{ZERO WIDTH SPACE}";
                unicode => '15.0',
                release => '2023-07-02',
        },
+
+       v5.40 => {
+               new => [
+                       ['<code>use v5.40</code>', 'import <a href="#builtin">builtin</a> functions and enable the <a href="#try">try</a> feature'],
+                       ['<code>__CLASS__</code>', 'keyword to reference to the current class name, similar to <code>__PACKAGE__</code>', {feature => 'class', name => 'class_ref'}],
+                       ['<code>:reader</code>', 'attribute for <a href="#class">field</a> variables to create corresponding accessor methods', {feature => 'class'}],
+                       ['<code>^^</code>', 'higher precedence logical <code>xor</code> operator, as <code>||</code> is to <code>or</code>'],
+                       ['perl<code> -M&nbsp;…</code>', 'whitespace allowed after <code>-M</code> options', {dropped => 0}],
+                       ['<code>builtin::inf</code>, <code>builtin::nan</code>', 'constants equivalent to special floating point values <em>infinity</em> and <em>Not a Number</em>'],
+               ],
+               modules => [
+                       ['Test2::Suite' => 'comprehensive set of test tools for writing unit tests, providing a drop in replacement to <code>Test::More</code>'],
+                       ['Term::Table' => 'format rows of data as ASCII tables, as in <a href="#test2_suite">Test2</a> diffs', {dropped => 0}],
+               ],
+               release => '2024-06-09',
+       },
 }