X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/0dda0e3a03a9068cd21f8b20252f531e96cb7d1e..d98df9cb4fb14f54acb85c59fcff90800be73e01:/perl.inc.pl?ds=sidebyside diff --git a/perl.inc.pl b/perl.inc.pl index 7b50cef..f6f2b3f 100644 --- a/perl.inc.pl +++ b/perl.inc.pl @@ -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}"; ['state', 'persistent my variables (scalars only until 5.28)', {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}"; ['/(?[ a + b ])/', 'regex set operations (character subtraction -, union +, intersection &, xor ^)', {experimental => 'regex_sets', stable => v5.36}], ['my sub', 'lexical subroutines (also state, our); buggy before v5.22', {experimental => 'lexical_subs', stable => v5.26}], ['next $expression', 'loop controls allow runtime expressions'], - [q"no warnings 'experimental::…'", 'mechanism for experimental features, as of now required for smartmatch'], + [q"no warnings 'experimental::…'", 'mechanism for experimental features, as of now required for smartmatch'], ], release => '2013-05-18', distro => { @@ -225,7 +225,7 @@ my $wbr = "\N{ZERO WIDTH SPACE}"; v5.20 => { new => [ - ['sub ($var)', 'subroutine signatures', {feature => 'signatures', experimental => 'signatures', stable => v5.36}], + ['sub ($var)', 'subroutine signatures', {feature => 'signatures', experimental => 'signatures', stable => v5.36, bundle => 0}], ['%hash{…}', 'hash slices return key+value pairs'], ['[]->@*', 'postfix dereferencing (also e.g. $scalar->$* for $$scalar)', {feature => 'postderef, postderef_qq', experimental => 'postderef', stable => v5.23.1}], [q"use warnings 'once'; $a", 'variables $a and $b are exempt from used once warnings'], @@ -245,14 +245,15 @@ my $wbr = "\N{ZERO WIDTH SPACE}"; v5.22 => { new => [ ['\$alias =', 'aliasing via reference (scoped as of v5.25.3)', {experimental => 'refaliasing'}], - ['<<>>', 'safe readline ignoring open flags in arguments'], + ['<<…>>', 'safe readline ignoring open flags in arguments'], ['/()/n', 'flag to disable numbered capturing, turning () into (?:)'], ['/\b{}/', 'boundary types: gcb (grapheme cluster), sb (sentence), wb (word)'], ['&.', '& | ^ ~ consistently numeric, dotted operators for strings', {feature => 'bitwise', experimental => 'bitwise', stable => v5.28}], [q"use re 'strict'", 'apply stricter syntax rules to regular expression patterns', {experimental => 're_strict'}], ['0x.beep+0', q"hexadecimal floating point notation with binary power; printf '%a' to display"], ['??', 'single match shorthand (deprecated since v5.14) requires the operator m?PATTERN?'], - ['use CGI' => 'deprecated interface for serving http requests removed from core, see CGI::Alternatives', {name => 'cgi'}], + ['use CGI' => 'deprecated interface for serving http requests removed from core' + .', see CGI::Alternatives', {name => 'cgi'}], ], unicode => '7.0', release => '2015-06-01', @@ -335,11 +336,11 @@ my $wbr = "\N{ZERO WIDTH SPACE}"; v5.32 => { new => [ - ['isa', 'infix operator to check class instance', {feature => 'isa', experimental => 'isa', stable => v5.36}], - ['$min < $_ <= $max', 'chained comparison repeats inner part as $min < $_ and $_ <= $max'], + ['isa', 'infix operator to check class instance', {feature => 'isa', experimental => 'isa', stable => v5.36, bundle => 0}], + ['$min < $_ <= $max', 'chained comparison repeats inner part as $min < $_ and $_ <= $max'], ['/\p{Name=$var}/', 'match Unicode Name property like \N{} but with interpolation and subpatterns'], [q"open F, '+>>', undef", 'respect append mode on temporary files with mixed access'], - ["no feature 'indirect'", 'disable indirect object notation such as new Class instead of Class->new'], + ["no feature 'indirect'", 'disable indirect object notation such as new Class instead of Class->new', {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 => [ - ['try {} catch', 'exception handling similar to eval blocks', {feature => 'try', experimental => 'try'}], + ['try {} catch', 'exception handling similar to eval blocks', {feature => 'try', experimental => 'try', stable => v5.40, bundle => 0}], ['/{,n}/', 'empty lower bound quantifier is accepted as shorthand for 0'], ['\x{ … }', 'insignificant space within curly braces, also for \b{}, \g{}, \k{}, \N{}, \o{} as well as /{m,n}/ quantifiers'], ['0o0', 'octal prefix 0o alternative to 0… and oct'], - ['re::optimization(qr//)', 'debug regular expression optimization information discovered at compile time'], - ['no feature …', 'disable discouraged practices of bareword_filehandles and multidimensional array emulation'], + ["re::optimization(${wbr}qr//)", 'debug regular expression optimization information discovered at compile time'], + ['no feature …', 'disable discouraged practices of multidimensional and bareword_filehandles 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 => [ - ['use v5.36', "use warnings; use feature qw'signatures isa'; no feature qw'indirect multidimensional switch'"], - ['use builtin', 'namespace for interpreter functions, such as weaken and blessed from Scalar::Util, ceil/floor from POSIX, and trim like String::Util', {experimental => 'builtin'}], + ['use v5.36', q{use warnings; use feature qw'signatures isa'; no feature qw'indirect multidimensional switch'}], + ['use builtin', 'namespace for interpreter functions, such as weaken and blessed from Scalar::Util, ceil/floor from POSIX, and trim like String::Util', {experimental => 'builtin', stable => v5.40, bundle => 0}], ['is_bool(!0)', 'distinguish scalar variable types (by builtin functions) for data interoperability', {name => 'is_bool'}], - ['for my ($k, $v) (%hash)', 'iterate over multiple values at a time (including builtin::indexed for arrays)', {experimental => 'for_list', feature => 'for_list'}], + ['for my ($k, $v) (%hash)', 'iterate over multiple values at a time (including builtin::indexed for arrays)', {experimental => 'for_list', feature => 'for_list', stable => v5.40}], ['defer {}', 'queue code to be executed when going out of scope', {feature => 'defer', experimental => 'defer'}], - ['try {} finally {}', 'run code at the end of a try construct regardless of failure', {name => 'finally', feature => 'try', experimental => 'try'}], + ['try {} finally {}', 'run code at the end of a try construct regardless of failure', {name => 'finally', feature => 'try', experimental => 'try', stable => 0}], # not stable in v5.40 ['q«…»', 'unicode delimiters for quoting operators', {experimental => 'extra_paired_delimiters'}], ['sub ($var) {!pop}', 'signatured subs are stable, but mixing with the arguments array @_ remains experimental', {feature => 'signatures', experimental => 'args_array_with_signatures'}], ['$SIG{FPE}', '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 => [ - ['use feature "module_true"', 'default in use 5.37 and up, also no feature "bareword_filehandles"'], + ['use feature "module_true"', 'packages implicitly return true, enabled along with no feature "bareword_filehandles"', {name => 'module_true', bundle => 0}], ['sub ($var ||= default)', 'assign values when false (or undefined on //=) instead of omitted'], - ['/(*{ … })/', 'optimistic eval: (?{ … }) with regex optimisations enabled'], + ['/(*{ … })/', 'optimistic eval: (?{ … }) with regex optimisations enabled'], ['class', "define object classes: packages with field variables and method subroutines", {feature => 'class', experimental => 'class'}], ['${^LAST_SUCCESSFUL_PATTERN}', 'explicit variable to access the previous match as in s//…/'], ['%{^HOOK}', "perform tasks require__before and require__after when calling require"], # also @INC hook enhancements @@ -407,4 +408,20 @@ my $wbr = "\N{ZERO WIDTH SPACE}"; unicode => '15.0', release => '2023-07-02', }, + + v5.40 => { + new => [ + ['use v5.40', 'import builtin functions and enable the try feature'], + ['__CLASS__', 'keyword to reference to the current class name, similar to __PACKAGE__', {feature => 'class', name => 'class_ref'}], + [':reader', 'attribute for field variables to create corresponding accessor methods', {feature => 'class'}], + ['^^', 'higher precedence logical xor operator, as || is to or'], + ['perl -M â€¦', 'whitespace allowed after -M options', {dropped => 0}], + ['builtin::inf, builtin::nan', 'constants equivalent to special floating point values infinity and Not a Number'], + ], + modules => [ + ['Test2::Suite' => 'comprehensive set of test tools for writing unit tests, providing a drop in replacement to Test::More'], + ['Term::Table' => 'format rows of data as ASCII tables, as in Test2 diffs', {dropped => 0}], + ], + release => '2024-06-09', + }, }