X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/931846c232a49cb1a195b40be80e73f0e2f70609..bf91078d6b5c7d4f5b376ddb25b825c9cabf8e85:/perl.inc.pl?ds=inline
diff --git a/perl.inc.pl b/perl.inc.pl
index 9f18c34..1291ceb 100644
--- a/perl.inc.pl
+++ b/perl.inc.pl
@@ -1,6 +1,7 @@
use utf8;
use strict;
+my $wbr = "\N{ZERO WIDTH SPACE}";
+{
v5.004 => {
release => '1997-05-15',
@@ -75,7 +76,7 @@ use strict;
],
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))'],
@@ -85,7 +86,7 @@ use strict;
['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; $elapsed = tv_interval $μs'],
+ ['Time::HiRes' => 'high resolution timers', '$μs = [gettimeofday]; sleep .1;'.$wbr.' $elapsed = tv_interval $μs'],
],
release => '2002-07-18',
distro => {
@@ -121,11 +122,11 @@ use strict;
['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") => "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/")->fetch(to => \$slurp)'],
+ ['File::Fetch' => 'generic data retrieval/download', 'File::Fetch->new(uri => "http://localhost/")'.$wbr.'->fetch(to => \$slurp)'],
],
release => '2007-12-18',
distro => {
@@ -251,6 +252,8 @@ use strict;
[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'}],
],
unicode => '7.0',
release => '2015-06-01',
@@ -321,6 +324,7 @@ use strict;
['m(\p{nv=/.*/})
', 'match unicode properties by regular expressions', {experimental => 'uniprop_wildcards'}],
['my $state if 0
', 'workaround for state
(deprecated since v5.10!) is now prohibited'],
[q"qr'\N'
", 'Delimiters must be graphemes; unescaped {
illegal; \N
in single quotes'],
+ ['use Locale::Codes
', 'removed from core, get actual lists from CPAN', {dropped => v5.30}],
],
unicode => '12.1',
release => '2019-05-22',
@@ -333,7 +337,7 @@ use strict;
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
'],
+ ['$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
'],
@@ -354,11 +358,11 @@ use strict;
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}],
['/{,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'],
+ ["re::optimization(${wbr}qr//)
", 'debug regular expression optimization information discovered at compile time'],
['no feature â¦
', 'disable discouraged practices of bareword_filehandles
and multidimensional
array emulation'],
],
release => '2021-05-20',
@@ -371,11 +375,11 @@ use strict;
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 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}],
['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'}],
@@ -393,7 +397,7 @@ use strict;
new => [
['use feature "module_true"
', 'default in use 5.37 and up, also no feature "bareword_filehandles"
'],
['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
@@ -404,4 +408,20 @@ use strict;
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'}],
+ [':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',
+ },
}