X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/a448623d4ae3e8fb391dab7359a41043173c16e8..HEAD:/perl.inc.pl

diff --git a/perl.inc.pl b/perl.inc.pl
index 6ab2fdf..e26cbcd 100644
--- a/perl.inc.pl
+++ b/perl.inc.pl
@@ -1,5 +1,7 @@
 use utf8;
+use strict;
 
+my $wbr = "\N{ZERO WIDTH SPACE}";
 +{
 	v5.004 => {
 		release => '1997-05-15',
@@ -11,7 +13,7 @@ use utf8;
 
 	v5.005 => {
 		new => [
-			['threads' => '', {experimental => 0, stable => 0}],
+			['<code>lock</code>', 'obsolete <code>Thread</code> implementation, including a keyword to place advisory locks on shared variables', {experimental => 0, stable => 0, dropped => v5.10}],
 			['<code>B::…</code>', 'backend hooks'],
 			['<code>qr//</code>' => 'overhauled regular expression engine: precompile operator, lookahead/behind, code, conditions, localised flags'],
 			['<code>… foreach</code>' => '<code>for(each)</code> as statement modifier, with large ranges optimised as counting loops'],
@@ -23,19 +25,26 @@ use utf8;
 			['<code>splice …,…,-$length</code>', 'negative length indicates elements to keep at the end of an array'],
 			['<code>$/</code>', 'integer or scalar separator makes <code>&lt;&gt;</code> read records instead of lines'],
 		],
+		modules => [
+			['Data::Dumper' => 'stringify data structures'],
+			['Errno' => 'system <code>errno.h</code> constants'],
+			['File::Spec'],
+			['Fatal'],
+			['Test'],
+		],
 		release => '1998-07-22',
 		unstable => 0,
 	},
 
 	v5.6 => {
 		new => [
-			['<code>use warnings</code>', 'pragma to enable warnings in lexical scope'],
-			['<code>use utf8</code>', 'experimental unicode semantics <small>(completed in v5.8)</small>', {experimental => 0, stable => v5.8}],
+			['<code>use warnings</code>', 'pragma to enable warnings in lexical scope', {name => 'warnings'}],
+			['<code>use utf8</code>', 'experimental unicode semantics <small>(completed in <a href="#utf8_data">v5.8</a>)</small>', {name => 'utf8', experimental => 0, stable => v5.8}],
 			['<code>use charnames</code>', 'string escape <code>\N{}</code> to insert named character'],
 			['<code>our</code>', 'declare global variables'],
 			['<code>v1.2.3</code>', q"represent strings as vector of ordinals, useful in version numbers (<code>printf '%vd'</code> to display)"],
 			['<code>0b0</code>', q"binary numbers in literals, <code>printf '%b'</code>, and <code>oct</code>"],
-			['<code>sub :lvalue</code>', 'subroutine attribute to return a modifiable value', {experimental => 0, stable => v5.20}],
+			['<code>sub :lvalue</code>', 'subroutine attribute to return a modifiable value', {name => 'sub_lvalue', experimental => 0, stable => v5.20}],
 #			['<code>sub :locked :method</code>', 'syntax to declare subroutine attributes'], # can be inferred from :lvalue support
 			['<code>open my $fh, $mode, $expr</code>', 'file handles in scoped scalars, third argument for unambiguous file name'],
 			[q"<code>pack 'q'</code>", '64-bit integer support (also large files &gt;2GiB)', {experimental => 0, stable => v5.8.1}],
@@ -58,13 +67,26 @@ use utf8;
 
 	v5.8 => {
 		new => [
-			[q"<code>no utf8</code>", 'full unicode support, <code>utf8</code> pragma only for script encoding'],
-			[q"<code>binmode $fh, ':perlio'</code>", 'file handle behaviour altered by PerlIO layers'],
+			[q"<code>no utf8</code>", 'full unicode support, <code>utf8</code> pragma only for script encoding', {name => 'utf8_data'}],
+			[q"<code>use open</code>", 'file handle behaviour altered by PerlIO layers', {name => 'perlio', eg => 'binmode $fh, ":bytes"'}],
 			[q"<code>open $fh, '-|', @cmd</code>", 'open list to fork a command without spawning a shell'],
 			[q"<code>open $fh, '>', \$var</code>", 'perl scalars as virtual files'],
 			[q"<code>printf '%1$s', @args</code>", 'syntax to use parameters out of order'],
 			[q"<code>1_2_3 == 123</code>", 'underscores between digits allowed in numeric constants'],
-#			[q"<code>use if</code>", 'conditional module inclusion'], # also installable in earlier versions
+		],
+		modules => [
+			[bignum => 'transparent big number support', 'length 1e100 == 101'],
+			[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))'],
+			['File::Temp' => 'create a temporary file or directory safely', '$fh = tempfile();'],
+			['List::Util' => 'general-utility list subroutines', '@cards = shuffle 0..51'],
+			['Locale::Maketext' => 'various localization and internationalization in <code>Locale::*</code> and <code>L18N::*</code>'],
+			['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'],
 		],
 		release => '2002-07-18',
 		distro => {
@@ -88,7 +110,7 @@ use utf8;
 			['<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>', {feature => 'switch', experimental => 'smartmatch'}],
+			['<code>given</code>', 'switch statement to smart-match with <code>when</code>/<code>default</code>', {name => 'switch', feature => 'switch', 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'],
@@ -97,7 +119,14 @@ use utf8;
 			['<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', {feature => 'state'}],
+			['<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'],
+			# overloading
+			['IO::Compress::Zip' => 'various file compression standards', 'zip IO::Uncompress::Gunzip->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)'],
 		],
 		release => '2007-12-18',
 		distro => {
@@ -122,6 +151,7 @@ use utf8;
 			['<code>… when</code>', '<code>when</code> is now allowed to be used as a statement modifier'],
 			[q"<code>use overload 'qr'</code>", 'customisable conversion to regular expressions'],
 			['<code>/\N/</code>', 'inverse \n to match any character except newline regardless of <code>/s</code>', {experimental => 0, stable => v5.18}],
+			['<code>each $ref</code> e.a.', 'array and hash container functions accept references', {experimental => 'autoderef', dropped => v5.23.1}],
 		],
 		release => '2010-04-12',
 		unicode => '5.2',
@@ -141,10 +171,14 @@ use utf8;
 			['<code>/dalu</code>', 'regexp modifiers to restrict character classes: either <strong>d</strong>efault, <strong>a</strong>scii, <strong>l</strong>ocale, or <strong>u</strong>nicode semantics.'],
 			[q"<code>use re '/flags'</code>", 'customise default modifiers'],
 			['<code>/(?^)/</code>', 'construct to reset to default modifiers'],
-			['<code>each $ref</code> e.a.', 'array and hash container functions accept references', {experimental => 'postderef', dropped => v5.23.1}],
 			['<code>FH->method</code>', 'filehandle method calls load IO::File on demand (eg. <code>STDOUT->flush</code>)'],
 			['<code>\o{}</code>', 'escape sequence for octal values beyond \777'],
 		],
+		modules => [
+			[JSON => 'interface with data in JavaScript Object Notation', 'decode_json <>'],
+			['HTTP::Tiny' => 'minimal HTTP/1.1 client without <code>LWP::UserAgent</code> overhead', {dropped => 0}],
+			# Unicode::Collate::Locale
+		],
 		release => '2011-05-14',
 		distro => {
 			debian => '7', # wheezy 2013-05 eol 2018-05 elts 2020-06
@@ -184,6 +218,7 @@ use utf8;
 		distro => {
 			ubuntu => '14.04 LTS', # trusty
 			opensuse => '13.1', # 2013-11 eol 2016-01
+			macos => '10.15', # pre-installed catalina 2019-10
 		},
 		unicode => '6.2',
 	},
@@ -247,6 +282,9 @@ use utf8;
 			['<code>@{^CAPTURE}</code>', q"array of last match's captures, so <code>${^CAPTURE}[0]</code> is <code>$1</code>"],
 			['<code>//xx</code>', 'extended modifier to also ignore whitespace in bracketed character classes'],
 		],
+		modules => [
+			['Test2::V0' => 'generic testing framework to replace <code>Test::*</code> and <code>TAP::*</code>'],
+		],
 		unicode => '9.0', # also Script_Extensions/scx in "\p{script}"
 		release => '2017-05-30',
 		distro => {
@@ -263,7 +301,7 @@ use utf8;
 			['<code>delete %hash{…}</code>', 'hash slices can be deleted with key+value pairs'],
 			['<code>/(*…)/</code>', 'alphabetic synonyms for assertions, e.g. <code>(*atomic:…)</code> for <code>(?&gt;…)</code> and <code>(*nlb:…)</code> for <code>(?&lt;!…)</code>', {experimental => 'alpha_assertions', stable => v5.31.6}],
 			['<code>/(*script_run:)/</code>', 'enforces all characters to be from the same script', {experimental => 'script_run', stable => v5.31.6}],
-			['<code>state @a</code>', 'persistent lexical array or hash variables'],
+			['<code>state @a</code>', 'persistent lexical array or hash variables (in addition to <a href="#state">scalars</a>)', {name => 'state_ext'}],
 			['perl<code> -i -pe die</code>', 'safe in-place editing: files are replaced only after successful completion'],
 			['<code>${^SAFE_LOCALES}</code>', 'locales are thread-safe on supported systems, indicated by this variable'],
 		],
@@ -273,6 +311,7 @@ use utf8;
 			debian => '10', # buster 2019-07
 			ubuntu => '19.04', # disco 2019-04 eol 2020-01
 			freebsd => '11', # eol 2021-09
+			macos => '11', # big sur 2020-11
 		},
 		distrosum => "stable systems such as Debian 10, Ubuntu 19.04, FreeBSD 11",
 	},
@@ -281,13 +320,14 @@ use utf8;
 		new => [
 			['<code>/(?<=var+)</code>', 'variable length lookbehind assertions', {experimental => 'vlb', stable => v5.36}],
 			['<code>m(\p{nv=/.*/})</code>', 'match unicode properties by regular expressions', {experimental => 'uniprop_wildcards'}],
-			['<code><s>my $state if 0</s></code>', 'workaround for <code>state</code> (deprecated since v5.10!) is now prohibited'],
-			[q"<code>qr'\N'</code>", 'Delimiters must be graphemes; unescaped { illegal; \N in single quotes'],
+			['<code><s>my $state if 0</s></code>', 'workaround for <code><a href="#state">state</a></code> (deprecated since v5.10!) is now prohibited'],
+			[q"<code>qr'\N'</code>", 'Delimiters must be graphemes; unescaped <code>{</code> illegal; <code>\N</code> in single quotes'],
 		],
 		unicode => '12.1',
 		release => '2019-05-22',
 		distro => {
 			ubuntu => '20.04', # focal LTS 2020-04 eol 2025-04
+			macos => '11.3', # big sur 2021-04 and monterrey 2021-10, alongside compatibility v5.18
 		},
 	},
 
@@ -295,7 +335,7 @@ use utf8;
 		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>/\p{Name=$var}/</code>', 'match Unicode Name property like \N{} but with interpolation and subpatterns'],
+			['<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>'],
 			['streamzip', 'program distributed with core IO::Compress::Base to compress stdin into a zip container'],
@@ -333,20 +373,36 @@ use utf8;
 		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>is_bool(!0)</code>', 'distinguish scalar variable types (by <code>builtin</code> functions) for data interoperability'],
+			['<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>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>try</code> construct regardless of failure', {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'}],
 			['<code>q«…»</code>', 'unicode delimiters for quoting operators', {experimental => 'extra_paired_delimiters'}],
-			['<code>sub ($var) {!<s>pop</s>}</code>', 'signatured 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'],
+			['<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'}],
 			['perl<code> -g</code>', 'disable input record separator (slurp mode), alias for <code>-0777</code>'],
 		],
 		unicode => '14.0',
 		release => '2022-05-28',
 		distro => {
-			debian => '12', # bookworm 2023 upcoming
+			debian => '12', # bookworm 2023-06
 			ubuntu => '23.04', # lunar upcoming
 		},
 	},
+
+	v5.38 => {
+		new => [
+			['<code>use feature "module_true"</code>', 'default in use 5.37 and up, also <code>no feature "bareword_filehandles"</code>'],
+			['<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>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
+			['<code>PERL_RAND_<wbr>SEED</code>', 'environment variable to set <code>srand</code> random number seed', {dropped => 0}],
+			['<code>is_tainted</code>', '<code>builtin</code> function to check variable tainting like <code>Scalar::Util::tainted</code>', {dropped => 0, experimental => 'builtin', eg => 'builtin::is_tainted($ENV{PWD}) and say "running perl -T"'}],
+			['<code>export_lexically</code>', '<code>builtin</code> function to export named functions into the calling scope', {dropped => 0, experimental => 'builtin', eg => 'method import {builtin::export_lexically {map {$_ => $self->can($_)} @_}}'}],
+		],
+		unicode => '15.0',
+		release => '2023-07-02',
+	},
 }