This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
filetest.t and ByteLoader build tweaks from Peter Prymmer
[perl5.git] / pod / perldelta.pod
1 =head1 NAME
2
3 perldelta - what's new for perl5.006 (as of 5.005_56)
4
5 =head1 DESCRIPTION
6
7 This document describes differences between the 5.005 release and this one.
8
9 =head1 Incompatible Changes
10
11 =head2 Perl Source Incompatibilities
12
13 None known at this time.
14
15 =head2 C Source Incompatibilities
16
17 =over 4
18
19 =item C<PERL_POLLUTE>
20
21 Release 5.005 grandfathered old global symbol names by providing preprocessor
22 macros for extension source compatibility.  As of release 5.006, these
23 preprocessor definitions are not available by default.  You need to explicitly
24 compile perl with C<-DPERL_POLLUTE> to get these definitions.  For
25 extensions still using the old symbols, this option can be
26 specified via MakeMaker:
27
28     perl Makefile.PL POLLUTE=1
29
30 =item C<PERL_POLLUTE_MALLOC>
31
32 Enabling Perl's malloc in release 5.005 and earlier caused
33 the namespace of system versions of the malloc family of functions to
34 be usurped by the Perl versions, since by default they used the
35 same names.
36
37 Besides causing problems on platforms that do not allow these functions to
38 be cleanly replaced, this also meant that the system versions could not
39 be called in programs that used Perl's malloc.  Previous versions of Perl
40 have allowed this behaviour to be suppressed with the HIDEMYMALLOC and
41 EMBEDMYMALLOC preprocessor definitions.
42
43 As of release 5.006, Perl's malloc family of functions have default names
44 distinct from the system versions.  You need to explicitly compile perl with
45 C<-DPERL_POLLUTE_MALLOC> to get the older behaviour.  HIDEMYMALLOC
46 and EMBEDMYMALLOC have no effect, since the behaviour they enabled is now
47 the default.
48
49 Note that these functions do B<not> constitute Perl's memory allocation API.
50 See L<perlguts/"Memory Allocation"> for further information about that.
51
52 =item C<PL_na> and C<dTHR> Issues
53
54 The C<PL_na> global is now thread local, so a C<dTHR> declaration is needed
55 in the scope in which the global appears.  XSUBs should handle this automatically,
56 but if you have used C<PL_na> in support functions, you either need to
57 change the C<PL_na> to a local variable (which is recommended), or put in
58 a C<dTHR>.
59
60 =back
61
62 =head2 Compatible C Source API Changes
63
64 =over
65
66 =item C<PATCHLEVEL> is now C<PERL_VERSION>
67
68 The cpp macros C<PERL_REVISION>, C<PERL_VERSION>, and C<PERL_SUBVERSION>
69 are now available by default from perl.h, and reflect the base revision,
70 patchlevel, and subversion respectively.  C<PERL_REVISION> had no
71 prior equivalent, while C<PERL_VERSION> and C<PERL_SUBVERSION> were
72 previously available as C<PATCHLEVEL> and C<SUBVERSION>.
73
74 The new names cause less pollution of the B<cpp> namespace and reflect what
75 the numbers have come to stand for in common practice.  For compatibility,
76 the old names are still supported when F<patchlevel.h> is explicitly
77 included (as required before), so there is no source incompatibility
78 from the change.
79
80 =back
81
82 =head2 Binary Incompatibilities
83
84 This release is not binary compatible with the 5.005 release or its
85 maintenance versions.
86
87 =head1 Core Changes
88
89 =head2 Unicode and UTF-8 support
90
91 Perl can optionally use UTF-8 as its internal representation for character
92 strings.  The C<use utf8> pragma enables this support in the current lexical
93 scope.  See L<utf8> for more information.
94
95 =head2 Lexically scoped warning categories
96
97 You can now control the granularity of warnings emitted by perl at a finer
98 level using the C<use warning> pragma.  See L<warning> and L<perllexwarn>
99 for details.
100
101 =head2 Binary numbers supported
102
103 Binary numbers are now supported as literals, in s?printf formats, and
104 C<oct()>:
105
106     $answer = 0b101010;
107     printf "The answer is: %b\n", oct("0b101010");
108
109 =head2 syswrite() ease-of-use
110
111 The length argument of C<syswrite()> is now optional.
112
113 =head2 64-bit support
114
115 Better 64-bit support -- but full support still a distant goal.  One
116 must Configure with -Duse64bits to get Configure to probe for the
117 extent of 64-bit support.  Depending on the platform (hints file) more
118 or less 64-awareness becomes available.  As of 5.005_54 at least
119 somewhat 64-bit aware platforms are HP-UX 11 or better, Solaris 2.6 or
120 better, IRIX 6.2 or better.  Naturally 64-bit platforms like Digital
121 Unix and UNICOS also have 64-bit support.
122
123 =head2 Better syntax checks on parenthesized unary operators
124
125 Expressions such as:
126
127     print defined(&foo,&bar,&baz);
128     print uc("foo","bar","baz");
129     undef($foo,&bar);
130
131 used to be accidentally allowed in earlier versions, and produced
132 unpredictable behaviour.  Some produced ancillary warnings
133 when used in this way; others silently did the wrong thing.
134
135 The parenthesized forms of most unary operators that expect a single
136 argument now ensure that they are not called with more than one
137 argument, making the cases shown above syntax errors.  The usual
138 behaviour of:
139
140     print defined &foo, &bar, &baz;
141     print uc "foo", "bar", "baz";
142     undef $foo, &bar;
143
144 remains unchanged.  See L<perlop>.
145
146 =head2 Improved C<qw//> operator
147
148 The C<qw//> operator is now evaluated at compile time into a true list
149 instead of being replaced with a run time call to C<split()>.  This
150 removes the confusing misbehaviour of C<qw//> in scalar context, which
151 had inherited that behaviour from split().
152
153 Thus:
154
155     $foo = ($bar) = qw(a b c); print "$foo|$bar\n";
156
157 now correctly prints "3|a", instead of "2|a".
158
159 =head2 pack() format 'Z' supported
160
161 The new format type 'Z' is useful for packing and unpacking null-terminated
162 strings.  See L<perlfunc/"pack">.
163
164 =head2 pack() format modifier '!' supported
165
166 The new format type modifier '!' is useful for packing and unpacking
167 native shorts, ints, and longs.  See L<perlfunc/"pack">.
168
169 =head2 $^X variables may now have names longer than one character
170
171 Formerly, $^X was synonymous with ${"\cX"}, but $^XY was a syntax
172 error.  Now variable names that begin with a control character may be
173 arbitrarily long.  However, for compatibility reasons, these variables
174 I<must> be written with explicit braces, as C<${^XY}> for example.
175 C<${^XYZ}> is synonymous with ${"\cXYZ"}.  Variable names with more
176 than one control character, such as C<${^XY^Z}>, are illegal.
177
178 The old syntax has not changed.  As before, `^X' may be either a
179 literal control-X character or the two-character sequence `caret' plus
180 `X'.  When braces are omitted, the variable name stops after the
181 control character.  Thus C<"$^XYZ"> continues to be synonymous with
182 C<$^X . "YZ"> as before.
183
184 As before, lexical variables may not have names beginning with control
185 characters.  As before, variables whose names begin with a control
186 character are always forced to be in package `main'.  All such variables
187 are reserved for future extensions, except those that begin with
188 C<^_>, which may be used by user programs and is guaranteed not to
189 acquire special meaning in any future version of Perl.
190
191 =head1 Significant bug fixes
192
193 =head2 E<lt>HANDLEE<gt> on empty files
194
195 With C<$/> set to C<undef>, slurping an empty file returns a string of
196 zero length (instead of C<undef>, as it used to) the first time the
197 HANDLE is read.  Further reads yield C<undef>.
198
199 This means that the following will append "foo" to an empty file (it used
200 to do nothing):
201
202     perl -0777 -pi -e 's/^/foo/' empty_file
203
204 The behaviour of:
205
206     perl -pi -e 's/^/foo/' empty_file
207
208 is unchanged (it continues to leave the file empty).
209
210 =head2 C<eval '...'> improvements
211
212 Line numbers (as reflected by caller() and most diagnostics) within
213 C<eval '...'> were often incorrect when here documents were involved.
214 This has been corrected.
215
216 Lexical lookups for variables appearing in C<eval '...'> within
217 functions that were themselves called within an C<eval '...'> were
218 searching the wrong place for lexicals.  The lexical search now
219 correctly ends at the subroutine's block boundary.
220
221 Parsing of here documents used to be flawed when they appeared as
222 the replacement expression in C<eval 's/.../.../e'>.  This has
223 been fixed.
224
225 =head2 Automatic flushing of output buffers
226
227 fork(), exec(), system(), qx//, and pipe open()s now flush buffers
228 of all files opened for output when the operation
229 was attempted.  This mostly eliminates confusing 
230 buffering mishaps suffered by users unaware of how Perl internally
231 handles I/O.
232
233 =head2 Better diagnostics on meaningless filehandle operations
234
235 Constructs such as C<open(E<lt>FHE<gt>)> and C<close(E<lt>FHE<gt>)>
236 are compile time errors.  Attempting to read from filehandles that
237 were opened only for writing will now produce warnings (just as
238 writing to read-only filehandles does).
239
240 =head1 Supported Platforms
241
242 =over 4
243
244 =item *
245
246 VM/ESA is now supported.
247
248 =item *
249
250 Siemens BS2000 is now supported under the POSIX Shell.
251
252 =item *
253
254 The Mach CThreads (NEXTSTEP, OPENSTEP) are now supported by the Thread
255 extension.
256
257 =item *
258
259 GNU/Hurd is now supported.
260
261 =item *
262
263 Rhapsody is now supported.
264
265 =back
266
267 =head1 New tests
268
269 =over 4
270
271 =item   op/io_const
272
273 IO constants (SEEK_*, _IO*).
274
275 =item   op/io_dir
276
277 Directory-related IO methods (new, read, close, rewind, tied delete).
278
279 =item   op/io_multihomed
280
281 INET sockets with multi-homed hosts.
282
283 =item   op/io_poll
284
285 IO poll().
286
287 =item   op/io_unix
288
289 UNIX sockets.
290
291 =item   op/filetest
292
293 File test operators.
294
295 =item   op/lex_assign
296
297 Verify operations that access pad objects (lexicals and temporaries).
298
299 =back
300
301 =head1 Modules and Pragmata
302
303 =head2 Modules
304
305 =over 4
306
307 =item Dumpvalue
308
309 Added Dumpvalue module provides screen dumps of Perl data.
310
311 =item Benchmark
312
313 You can now run tests for I<n> seconds instead of guessing the right
314 number of tests to run: e.g. timethese(-5, ...) will run each 
315 code for at least 5 CPU seconds.  Zero as the "number of repetitions"
316 means "for at least 3 CPU seconds".  The output format has also
317 changed.  For example:
318
319 use Benchmark;$x=3;timethese(-5,{a=>sub{$x*$x},b=>sub{$x**2}})
320
321 will now output something like this:
322
323 Benchmark: running a, b, each for at least 5 CPU seconds...
324          a:  5 wallclock secs ( 5.77 usr +  0.00 sys =  5.77 CPU) @ 200551.91/s (n=1156516)
325          b:  4 wallclock secs ( 5.00 usr +  0.02 sys =  5.02 CPU) @ 159605.18/s (n=800686)
326
327 New features: "each for at least N CPU seconds...", "wallclock secs",
328 and the "@ operations/CPU second (n=operations)".
329
330 =item Devel::Peek
331
332 The Devel::Peek module provides access to the internal representation
333 of Perl variables and data.  It is a data debugging tool for the XS programmer.
334
335 =item Fcntl
336
337 More Fcntl constants added: F_SETLK64, F_SETLKW64, O_LARGEFILE for
338 large (more than 4G) file access (64-bit support is not yet
339 working, though, so no need to get overly excited), Free/Net/OpenBSD
340 locking behaviour flags F_FLOCK, F_POSIX, Linux F_SHLCK, and
341 O_ACCMODE: the mask of O_RDONLY, O_WRONLY, and O_RDWR.
342
343 =item File::Spec
344
345 New methods have been added to the File::Spec module: devnull() returns
346 the name of the null device (/dev/null on Unix) and tmpdir() the name of
347 the temp directory (normally /tmp on Unix).  There are now also methods
348 to convert between absolute and relative filenames: abs2rel() and
349 rel2abs().  For compatibility with operating systems that specify volume
350 names in file paths, the splitpath(), splitdir(), and catdir() methods
351 have been added.
352
353 =item File::Spec::Functions
354
355 The new File::Spec::Functions modules provides a function interface
356 to the File::Spec module.  Allows shorthand
357
358     $fullname = catfile($dir1, $dir2, $file);
359
360 instead of
361
362     $fullname = File::Spec->catfile($dir1, $dir2, $file);
363
364 =item Math::BigInt
365
366 The logical operations C<E<lt>E<lt>>, C<E<gt>E<gt>>, C<&>, C<|>,
367 and C<~> are now supported on bigints.
368
369 =item Math::Complex
370
371 The accessor methods Re, Im, arg, abs, rho, and theta can now also
372 act as mutators (accessor $z->Re(), mutator $z->Re(3)).
373
374 =item Math::Trig
375
376 A little bit of radial trigonometry (cylindrical and spherical),
377 radial coordinate conversions, and the great circle distance were added.
378
379 =item SDBM_File
380
381 An EXISTS method has been added to this module (and sdbm_exists() has
382 been added to the underlying sdbm library), so one can now call exists
383 on an SDBM_File tied hash and get the correct result, rather than a
384 runtime error.
385
386 =item Time::Local
387
388 The timelocal() and timegm() functions used to silently return bogus
389 results when the date exceeded the machine's integer range.  They
390 now consistently croak() if the date falls in an unsupported range.
391
392 =item Win32
393
394 The error return value in list context has been changed for all functions
395 that return a list of values.  Previously these functions returned a list
396 with a single element C<undef> if an error occurred.  Now these functions
397 return the empty list in these situations.  This applies to the following
398 functions:
399
400     Win32::FsType
401     Win32::GetOSVersion
402
403 The remaining functions are unchanged and continue to return C<undef> on
404 error even in list context.
405
406 The Win32::SetLastError(ERROR) function has been added as a complement
407 to the Win32::GetLastError() function.
408
409 The new Win32::GetFullPathName(FILENAME) returns the full absolute
410 pathname for FILENAME in scalar context.  In list context it returns
411 a two-element list containing the fully qualified directory name and
412 the filename.
413
414 =item DBM Filters
415
416 A new feature called "DBM Filters" has been added to all the
417 DBM modules--DB_File, GDBM_File, NDBM_File, ODBM_File, and SDBM_File.
418 DBM Filters add four new methods to each DBM module:
419
420     filter_store_key
421     filter_store_value
422     filter_fetch_key
423     filter_fetch_value
424
425 These can be used to filter key-value pairs before the pairs are
426 written to the database or just after they are read from the database.
427 See L<perldbmfilter> for further information.
428
429 =back
430
431 =head2 Pragmata
432
433 C<use utf8> to enable UTF-8 and Unicode support.
434
435 C<use caller 'encoding'> allows modules to inherit pragmatic attributes
436 from the caller's context.  C<encoding> is currently the only supported
437 attribute.
438
439 Lexical warnings pragma, C<use warning;>, to control optional warnings.
440
441 C<use filetest> to control the behaviour of filetests (C<-r> C<-w> ...).
442 Currently only one subpragma implemented, "use filetest 'access';",
443 that enables the use of access(2) or equivalent to check
444 permissions instead of using stat(2) as usual.  This matters
445 in filesystems where there are ACLs (access control lists): the
446 stat(2) might lie, but access(2) knows better.
447
448 =head1 Utility Changes
449
450 Todo.
451
452 =head1 Documentation Changes
453
454 =over 4
455
456 =item perlopentut.pod
457
458 A tutorial on using open() effectively.
459
460 =item perlreftut.pod
461
462 A tutorial that introduces the essentials of references.
463
464 =item perltootc.pod
465
466 A tutorial on managing class data for object modules.
467
468 =back
469
470 =head1 New Diagnostics
471
472 =item /%s/: Unrecognized escape \\%c passed through
473
474 (W) You used a backslash-character combination which is not recognized
475 by Perl.  This combination appears in an interpolated variable or a
476 C<'>-delimited regular expression.
477
478 =item Filehandle %s opened only for output
479
480 (W) You tried to read from a filehandle opened only for writing.  If you
481 intended it to be a read-write filehandle, you needed to open it with
482 "+E<lt>" or "+E<gt>" or "+E<gt>E<gt>" instead of with "E<lt>" or nothing.  If
483 you intended only to read from the file, use "E<lt>".  See
484 L<perlfunc/open>.
485
486 =item Missing command in piped open
487
488 (W) You used the C<open(FH, "| command")> or C<open(FH, "command |")>
489 construction, but the command was missing or blank.
490
491 =item Unrecognized escape \\%c passed through
492
493 (W) You used a backslash-character combination which is not recognized
494 by Perl.
495
496 =item defined(@array) is deprecated
497
498 (D) defined() is not usually useful on arrays because it checks for an
499 undefined I<scalar> value.  If you want to see if the array is empty,
500 just use C<if (@array) { # not empty }> for example.  
501
502 =item defined(%hash) is deprecated
503
504 (D) defined() is not usually useful on hashes because it checks for an
505 undefined I<scalar> value.  If you want to see if the hash is empty,
506 just use C<if (%hash) { # not empty }> for example.  
507
508 =head1 Obsolete Diagnostics
509
510 Todo.
511
512 =head1 Configuration Changes
513
514 You can use "Configure -Uinstallusrbinperl" which causes installperl
515 to skip installing perl also as /usr/bin/perl.  This is useful if you
516 prefer not to modify /usr/bin for some reason or another but harmful
517 because many scripts assume to find Perl in /usr/bin/perl.
518
519 =head1 BUGS
520
521 If you find what you think is a bug, you might check the headers of
522 articles recently posted to the comp.lang.perl.misc newsgroup.
523 There may also be information at http://www.perl.com/perl/, the Perl
524 Home Page.
525
526 If you believe you have an unreported bug, please run the B<perlbug>
527 program included with your release.  Make sure to trim your bug down
528 to a tiny but sufficient test case.  Your bug report, along with the
529 output of C<perl -V>, will be sent off to perlbug@perl.com to be
530 analysed by the Perl porting team.
531
532 =head1 SEE ALSO
533
534 The F<Changes> file for exhaustive details on what changed.
535
536 The F<INSTALL> file for how to build Perl.
537
538 The F<README> file for general stuff.
539
540 The F<Artistic> and F<Copying> files for copyright information.
541
542 =head1 HISTORY
543
544 Written by Gurusamy Sarathy <F<gsar@umich.edu>>, with many contributions
545 from The Perl Porters.
546
547 Send omissions or corrections to <F<perlbug@perl.com>>.
548
549 =cut