pod/perl595delta.pod

   1 =head1 NAME
   2
   3 perldelta - what is new for perl v5.9.5
   4
   5 =head1 DESCRIPTION
   6
   7 This document describes differences between the 5.9.4 and the 5.9.5
   8 development releases. See L<perl590delta>, L<perl591delta>,
   9 L<perl592delta>, L<perl593delta> and L<perl594delta> for the differences
  10 between 5.8.0 and 5.9.4.
  11
  12 =head1 Incompatible Changes
  13
  14 =head2 Tainting and printf
  15
  16 When perl is run under taint mode, C<printf()> and C<sprintf()> will now
  17 reject any tainted format argument.
  18
  19 =head2 Removal of the bytecode compiler and of perlcc
  20
  21 C<perlcc>, the byteloader and the supporting modules (B::C, B::CC,
  22 B::Bytecode, etc.) are no longer distributed with the perl sources. Those
  23 experimental tools have never worked reliably, and, due to the lack of
  24 volunteers to keep them in line with the perl interpreter developments, it
  25 was decided to remove them instead of shipping a broken version of those.
  26 The last version of those modules can be found with perl 5.9.4.
  27
  28 However the B compiler framework stays supported in the perl core, as with
  29 the more useful modules it has permitted (among others, B::Deparse and
  30 B::Concise).
  31
  32 =head2 Removal of the JPL
  33
  34 The JPL (Java-Perl Linguo) has been removed from the perl sources tarball.
  35
  36 =head1 Core Enhancements
  37
  38 =head2 Regular expressions
  39
  40 =over 4
  41
  42 =item Recursive Patterns
  43
  44 It is now possible to write recursive patterns without using the C<(??{})>
  45 construct. This new way is more efficient, and in many cases easier to
  46 read.
  47
  48 Each capturing parenthesis can now be treated as an independent pattern
  49 that can be entered by using the C<(?PARNO)> syntax (C<PARNO> standing for
  50 "parenthesis number"). For example, the following pattern will match
  51 nested balanced angle brackets:
  52
  53     /
  54      ^                      # start of line
  55      (                      # start capture buffer 1
  56         <                   #   match an opening angle bracket
  57         (?:                 #   match one of:
  58             (?>             #     don't backtrack over the inside of this group
  59                 [^<>]+      #       one or more non angle brackets
  60             )               #     end non backtracking group
  61         |                   #     ... or ...
  62             (?1)            #     recurse to bracket 1 and try it again
  63         )*                  #   0 or more times.
  64         >                   #   match a closing angle bracket
  65      )                      # end capture buffer one
  66      $                      # end of line
  67     /x
  68
  69 Note, users experienced with PCRE will find that the Perl implementation
  70 of this feature differs from the PCRE one in that it is possible to
  71 backtrack into a recursed pattern, whereas in PCRE the recursion is
  72 atomic or "possessive" in nature. (Yves Orton)
  73
  74 =item Named Capture Buffers
  75
  76 It is now possible to name capturing parenthesis in a pattern and refer to
  77 the captured contents by name. The naming syntax is C<< (?<NAME>....) >>.
  78 It's possible to backreference to a named buffer with the C<< \k<NAME> >>
  79 syntax. In code, the new magical hash C<%+> can be used to access the
  80 contents of the buffers.
  81
  82 Thus, to replace all doubled chars, one could write
  83
  84     s/(?<letter>.)\k<letter>/$+{letter}/g
  85
  86 Only buffers with defined contents will be "visible" in the hash, so
  87 it's possible to do something like
  88
  89     foreach my $name (keys %+) {
  90         print "content of buffer '$name' is $+{$name}\n";
  91     }
  92
  93 Users exposed to the .NET regex engine will find that the perl
  94 implementation differs in that the numerical ordering of the buffers
  95 is sequential, and not "unnamed first, then named". Thus in the pattern
  96
  97    /(A)(?<B>B)(C)(?<D>D)/
  98
  99 $1 will be 'A', $2 will be 'B', $3 will be 'C' and $4 will be 'D' and not
 100 $1 is 'A', $2 is 'C' and $3 is 'B' and $4 is 'D' that a .NET programmer
 101 would expect. This is considered a feature. :-) (Yves Orton)
 102
 103 =item Possessive Quantifiers
 104
 105 Perl now supports the "possessive quantifier" syntax of the "atomic match"
 106 pattern. Basically a possessive quantifier matches as much as it can and never
 107 gives any back. Thus it can be used to control backtracking. The syntax is
 108 similar to non-greedy matching, except instead of using a '?' as the modifier
 109 the '+' is used. Thus C<?+>, C<*+>, C<++>, C<{min,max}+> are now legal
 110 quantifiers. (Yves Orton)
 111
 112 =item Backtracking control verbs
 113
 114 The regex engine now supports a number of special purpose backtrack
 115 control verbs: (*COMMIT), (*MARK), (*CUT), (*ERROR), (*FAIL) and
 116 (*ACCEPT). See L<perlre> for their descriptions.
 117
 118 =back
 119
 120 =head2 The C<_> prototype
 121
 122 A new prototype character has been added. C<_> is equivalent to C<$> (it
 123 denotes a scalar), but defaults to C<$_> if the corresponding argument
 124 isn't supplied. Due to the optional nature of the argument, you can only
 125 use it at the end of a prototype, or before a semicolon.
 126
 127 This has a small incompatible consequence: the prototype() function has
 128 been adjusted to return C<_> for some built-ins in appropriate cases (for
 129 example, C<prototype('CORE::rmdir')>). (Rafael Garcia-Suarez)
 130
 131 =head2 UNITCHECK blocks
 132
 133 C<UNITCHECK>, a new special code block has been introduced, in addition to
 134 C<BEGIN>, C<CHECK>, C<INIT> and C<END>.
 135
 136 C<CHECK> and C<INIT> blocks, while useful for some specialized purposes,
 137 are always executed at the transition between the compilation and the
 138 execution of the main program, and thus are useless whenever code is
 139 loaded at runtime. On the other hand, C<UNITCHECK> blocks are executed
 140 just after the unit which defined them has been compiled. See L<perlmod>
 141 for more information. (Alex Gough)
 142
 143 =head2 UCD 5.0.0
 144
 145 The copy of the Unicode Character Database included in Perl 5.9 has
 146 been updated to version 5.0.0.
 147
 148 =head1 Modules and Pragmas
 149
 150 =head2 New Core Modules
 151
 152 =over 4
 153
 154 =item *
 155
 156 C<Locale::Maketext::Simple>, needed by CPANPLUS, is a simple wrapper around
 157 C<Locale::Maketext::Lexicon>. Note that C<Locale::Maketext::Lexicon> isn't
 158 included in the perl core; the behaviour of C<Locale::Maketext::Simple>
 159 gracefully degrades when the later isn't present.
 160
 161 =item *
 162
 163 C<Params::Check> implements a generic input parsing/checking mechanism. It
 164 is used by CPANPLUS.
 165
 166 =back
 167
 168 =head2 Module changes
 169
 170 =over 4
 171
 172 =item C<base>
 173
 174 The C<base> pragma now warns if a class tries to inherit from itself.
 175
 176 =item C<warnings>
 177
 178 The C<warnings> pragma doesn't load C<Carp> anymore. That means that code
 179 that used C<Carp> routines without having loaded it at compile time might
 180 need to be adjusted; typically, the following (faulty) code won't work
 181 anymore, and will require parentheses to be added after the function name:
 182
 183     use warnings;
 184     require Carp;
 185     Carp::confess "argh";
 186
 187 =back
 188
 189 =head1 Utility Changes
 190
 191 =head1 Documentation
 192
 193 =head1 Performance Enhancements
 194
 195 =head1 Installation and Configuration Improvements
 196
 197 =head2 C++ compatibility
 198
 199 Efforts have been made to make perl and the core XS modules compilable
 200 with various C++ compilers (although the situation is not perfect with
 201 some of the compilers on some of the platforms tested.)
 202
 203 =head2 Ports
 204
 205 Perl has been reported to work on MidnightBSD.
 206
 207 =head1 Selected Bug Fixes
 208
 209 PerlIO::scalar will now prevent writing to read-only scalars. Moreover,
 210 seek() is now supported with PerlIO::scalar-based filehandles, the
 211 underlying string being zero-filled as needed.
 212
 213 study() never worked for UTF-8 strings, but could lead to false results.
 214 It's now a no-op on UTF-8 data. (Yves Orton)
 215
 216 The signals SIGILL, SIGBUS and SIGSEGV are now always delivered in an
 217 "unsafe" manner (contrary to other signals, that are deferred until the
 218 perl interpreter reaches a reasonably stable state; see
 219 L<perlipc/"Deferred Signals (Safe Signals)">).
 220
 221 =head1 New or Changed Diagnostics
 222
 223 =head1 Changed Internals
 224
 225 The anonymous hash and array constructors now take 1 op in the optree
 226 instead of 3, now that pp_anonhash and pp_anonlist return a reference to
 227 an hash/array when the op is flagged with OPf_SPECIAL (Nicholas Clark).
 228
 229 =head1 Known Problems
 230
 231 =head2 Platform Specific Problems
 232
 233 =head1 Reporting Bugs
 234
 235 If you find what you think is a bug, you might check the articles
 236 recently posted to the comp.lang.perl.misc newsgroup and the perl
 237 bug database at http://rt.perl.org/rt3/ .  There may also be
 238 information at http://www.perl.org/ , the Perl Home Page.
 239
 240 If you believe you have an unreported bug, please run the B<perlbug>
 241 program included with your release.  Be sure to trim your bug down
 242 to a tiny but sufficient test case.  Your bug report, along with the
 243 output of C<perl -V>, will be sent off to perlbug@perl.org to be
 244 analysed by the Perl porting team.
 245
 246 =head1 SEE ALSO
 247
 248 The F<Changes> file for exhaustive details on what changed.
 249
 250 The F<INSTALL> file for how to build Perl.
 251
 252 The F<README> file for general stuff.
 253
 254 The F<Artistic> and F<Copying> files for copyright information.
 255
 256 =cut