X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/dd4696a1325ef7f864385c347a22c20fd9591012..41af4e92ea22b885a6651537e8780d7be6d27287:/perl.inc.pl?ds=inline
diff --git a/perl.inc.pl b/perl.inc.pl
index ee7aaad..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,7 +245,7 @@ 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}],
@@ -336,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',
@@ -358,12 +358,12 @@ my $wbr = "\N{ZERO WIDTH SPACE}";
v5.34 => {
new => [
- ['try {} catch
', 'exception handling similar to eval blocks', {feature => 'try', experimental => 'try', stable => v5.40}],
+ ['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 => {
@@ -374,8 +374,8 @@ 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', stable => v5.40}],
+ ['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', stable => v5.40}],
['defer {}
', 'queue code to be executed when going out of scope', {feature => 'defer', experimental => 'defer'}],
@@ -395,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
@@ -412,7 +412,7 @@ my $wbr = "\N{ZERO WIDTH SPACE}";
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'}],
+ ['__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}],