do poll() emulation unless HAS_POLL && I_POLL
[p5sagit/p5-mst-13.2.git] / pod / perldelta.pod
1 =head1 NAME
2
3 perldelta - what's new for perl5.006 (as of 5.005_54)
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> in order to get these definitions.
25
26 =item C<PERL_POLLUTE_MALLOC>
27
28 Enabling the use of Perl's malloc in release 5.005 and earlier caused
29 the namespace of system versions of the malloc family of functions to
30 be usurped by the Perl versions of these functions, since they used the
31 same names by default.
32
33 Besides causing problems on platforms that do not allow these functions to
34 be cleanly replaced, this also meant that the system versions could not
35 be called in programs that used Perl's malloc.  Previous versions of Perl
36 have allowed this behavior to be suppressed with the HIDEMYMALLOC and
37 EMBEDMYMALLOC preprocessor definitions.
38
39 As of release 5.006, Perl's malloc family of functions have default names
40 distinct from the system versions.  You need to explicitly compile perl with
41 C<-DPERL_POLLUTE_MALLOC> in order to get the older behavior.  HIDEMYMALLOC
42 and EMBEDMYMALLOC have no effect, since the behavior they enabled is now
43 the default.
44
45 Note that these functions do B<not> constitute Perl's memory allocation API.
46 See L<perlguts/"Memory Allocation"> for further information about that.
47
48 =item C<PL_na> and C<dTHR> Issues
49
50 The C<PL_na> global is now thread local, so a C<dTHR> declaration is needed
51 in the scope in which it appears.  XSUBs should handle this automatically,
52 but if you have used C<PL_na> in support functions, you either need to
53 change the C<PL_na> to a local variable (which is recommended), or put in
54 a C<dTHR>.
55
56 =back
57
58 =head2 Compatible C Source API Changes
59
60 =over
61
62 =item C<PATCHLEVEL> is now C<PERL_VERSION>
63
64 The cpp macros C<PERL_REVISION>, C<PERL_VERSION> and C<PERL_SUBVERSION>
65 are now available by default from perl.h, and reflect the base revision,
66 patchlevel and subversion respectively.  C<PERL_REVISION> had no
67 prior equivalent, while C<PERL_VERSION> and C<PERL_SUBVERSION> were
68 previously available as C<PATCHLEVEL> and C<SUBVERSION>.
69
70 The new names cause less pollution of the cpp namespace, and reflect what
71 the numbers have come to stand for in common practice.  For compatibility,
72 the old names are still supported when patchlevel.h is explicitly
73 included (as required before), so there is no source incompatibility
74 due to the change.
75
76 =back
77
78 =head2 Binary Incompatibilities
79
80 This release is not binary compatible with the 5.005 release and its
81 maintenance versions.
82
83 =head1 Core Changes
84
85 =head2 Unicode and UTF-8 support
86
87 Perl can optionally use UTF-8 as its internal representation for character
88 strings.  The C<use utf8> pragma enables this support in the current lexical
89 scope.  See L<utf8> for more information.
90
91 =head2 Lexically scoped warning categories
92
93 You can now control the granularity of warnings emitted by perl at a finer
94 level using the C<use warning> pragma.  See L<warning> for details.
95
96 =head2 Binary numbers supported
97
98 Binary numbers are now supported as literals, in s?printf formats, and
99 C<oct()>:
100
101         $answer = 0b101010;
102         printf "The answer is: %b\n", oct("0b101010");
103
104 =head2 syswrite() ease-of-use
105
106 The length argument of C<syswrite()> is now optional.
107
108 =head2 64-bit support
109
110 Better 64-bit support -- but full support still a distant goal.  One
111 must Configure with -Duse64bits to get Configure to probe for the
112 extent of 64-bit support.  Depending on the platform (hints file) more
113 or less 64-awareness becomes available.  As of 5.005_54 at least
114 somewhat 64-bit aware platforms are HP-UX 11 or better, Solaris 2.6 or
115 better, IRIX 6.2 or better.  Naturally 64-bit platforms like Digital
116 UNIX and UNICOS also have 64-bit support.
117
118 =head2 Better syntax checks on parenthesized unary operators
119
120 Expressions such as:
121
122         print defined(&foo,&bar,&baz);
123         print uc("foo","bar","baz");
124         undef($foo,&bar);
125
126 used to be accidentally allowed in earlier versions, and produced 
127 unpredictable behavior.  Some of them produced ancillary warnings
128 when used in this way, while others silently did the wrong thing.
129
130 The parenthesized forms of most unary operators that expect a single
131 argument will now ensure that they are not called with more than one
132 argument, making the above cases syntax errors.  Note that the usual
133 behavior of:
134
135         print defined &foo, &bar, &baz;
136         print uc "foo", "bar", "baz";
137         undef $foo, &bar;
138
139 remains unchanged.  See L<perlop>.
140
141 =head2 Improved C<qw//> operator
142
143 The C<qw//> operator is now evaluated at compile time into a true list
144 instead of being replaced with a run time call to C<split()>.  This
145 removes the confusing behavior of C<qw//> in scalar context stemming from
146 the older implementation, which inherited the behavior from split().  
147
148 Thus:
149
150     $foo = ($bar) = qw(a b c); print "$foo|$bar\n";
151
152 now correctly prints "3|a", instead of "2|a".
153
154 =head2 pack() format 'Z' supported
155
156 The new format type 'Z' is useful for packing and unpacking null-terminated
157 strings.  See L<perlfunc/"pack">.
158
159 =head1 Significant bug fixes
160
161 =head2 E<lt>HANDLEE<gt> on empty files
162
163 With C<$/> set to C<undef>, slurping an empty file returns a string of
164 zero length (instead of C<undef>, as it used to) for the first time the
165 HANDLE is read.  Subsequent reads yield C<undef>.
166
167 This means that the following will append "foo" to an empty file (it used
168 to not do anything before):
169
170     perl -0777 -pi -e 's/^/foo/' empty_file
171
172 Note that the behavior of:
173
174     perl -pi -e 's/^/foo/' empty_file
175
176 is unchanged (it continues to leave the file empty).
177
178 =head2 pack() format modifier '_' supported
179
180 The new format type modifer '_' is useful for packing and unpacking
181 native shorts, ints, and longs.  See L<perlfunc/"pack">.
182
183 =head1 Supported Platforms
184
185 =over 4
186
187 =item *
188
189 VM/ESA is now supported.
190
191 =item *
192
193 Siemens BS200 is now supported.
194
195 =item *
196
197 The Mach CThreads (NeXTstep) are now supported by the Thread extension.
198
199 =back
200
201 =head1 New tests
202
203 =over 4
204
205 =item   op/io_const
206
207 IO constants (SEEK_*, _IO*).
208         
209 =item   op/io_dir
210
211 Directory-related IO methods (new, read, close, rewind, tied delete).
212
213 =item   op/io_multihomed
214
215 INET sockets with multi-homed hosts.
216
217 =item   op/io_poll
218
219 IO poll().
220
221 =item   op/io_unix
222
223 UNIX sockets.
224
225 =item   op/filetest
226
227 File test operators.
228
229 =item   op/lex_assign
230
231 Verify operations that access pad objects (lexicals and temporaries).
232
233 =back
234
235 =head1 Modules and Pragmata
236
237 =head2 Modules
238
239 =over 4
240
241 =item Dumpvalue
242
243 Added Dumpvalue module provides screen dumps of Perl data.
244
245 =item Benchmark
246
247 You can now run tests for I<x> seconds instead of guessing the right
248 number of tests to run.
249
250 =item Fcntl
251
252 More Fcntl constants added: F_SETLK64, F_SETLKW64, O_LARGEFILE for
253 large (more than 4G) file access (the 64-bit support is not yet
254 working, though, so no need to get overly excited), Free/Net/OpenBSD
255 locking behaviour flags F_FLOCK, F_POSIX, Linux F_SHLCK, and
256 O_ACCMODE: the mask of O_RDONLY, O_WRONLY, and O_RDWR.
257
258 =item Math::Complex
259  
260 The accessors methods Re, Im, arg, abs, rho, theta, methods can
261 ($z->Re()) now also act as mutators ($z->Re(3)).
262
263 =item Math::Trig
264
265 A little bit of radial trigonometry (cylindrical and spherical) added,
266 for example the great circle distance.
267
268 =item Time::Local
269
270 The timelocal() and timegm() functions used to silently return bogus
271 results when the date exceeded the machine's integer range.  They
272 consistently croak() if the date falls in an unsupported range.
273
274 =back
275
276 =head2 Pragmata
277
278 C<use utf8;>, to enable UTF-8 and Unicode support.
279
280 Lexical warnings pragma, C<use warning;>, to control optional warnings.
281
282 C<use filetest;>, to control the behaviour of filetests (C<-r> C<-w> ...).
283 Currently only one subpragma implemented, "use filetest 'access';",
284 that enables the use of access(2) or equivalent to check the
285 permissions instead of using stat(2) as usual.  This matters
286 in filesystems where there are ACLs (access control lists), the
287 stat(2) might lie, while access(2) knows better.
288
289 =head1 Utility Changes
290
291 Todo.
292
293 =head1 Documentation Changes
294
295 =over 4
296
297 =item perlopentut.pod
298
299 A tutorial on using open() effectively.
300
301 =item perlreftut.pod
302
303 A tutorial that introduces the essentials of references.
304
305 =back
306
307 =head1 New Diagnostics
308
309 =item /%s/: Unrecognized escape \\%c passed through
310
311 (W) You used a backslash-character combination which is not recognized
312 by Perl.  This combination appears in an interpolated variable or a 
313 C<'>-delimited regular expression.
314
315 =item Unrecognized escape \\%c passed through
316
317 (W) You used a backslash-character combination which is not recognized
318 by Perl.
319
320 =item Missing command in piped open
321
322 (W) You used the C<open(FH, "| command")> or C<open(FH, "command |")>
323 construction, but the command was missing or blank.
324
325 =head1 Obsolete Diagnostics
326
327 Todo.
328
329 =head1 Configuration Changes
330
331 You can use "Configure -Uinstallusrbinperl" which causes installperl
332 to skip installing perl also as /usr/bin/perl.  This is useful if you
333 prefer not to modify /usr/bin for some reason or another but harmful
334 because many scripts assume to find Perl in /usr/bin/perl.
335
336 =head1 BUGS
337
338 If you find what you think is a bug, you might check the headers of
339 recently posted articles in the comp.lang.perl.misc newsgroup.
340 There may also be information at http://www.perl.com/perl/, the Perl
341 Home Page.
342
343 If you believe you have an unreported bug, please run the B<perlbug>
344 program included with your release.  Make sure you trim your bug down
345 to a tiny but sufficient test case.  Your bug report, along with the
346 output of C<perl -V>, will be sent off to <F<perlbug@perl.com>> to be
347 analysed by the Perl porting team.
348
349 =head1 SEE ALSO
350
351 The F<Changes> file for exhaustive details on what changed.
352
353 The F<INSTALL> file for how to build Perl.
354
355 The F<README> file for general stuff.
356
357 The F<Artistic> and F<Copying> files for copyright information.
358
359 =head1 HISTORY
360
361 Written by Gurusamy Sarathy <F<gsar@umich.edu>>, with many contributions
362 from The Perl Porters.
363
364 Send omissions or corrections to <F<perlbug@perl.com>>.
365
366 =cut