X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/dd4696a1325ef7f864385c347a22c20fd9591012..3afdb629211b357a3760e14b92e9966b2d414a0d:/perl.inc.pl?ds=sidebyside 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}],