7a371fb5869cd090bef4128ddcc2bc11d8b2545d
[p5sagit/p5-mst-13.2.git] / pod / perldelta.pod
1 =head1 NAME
2
3 perldelta - what's new for perl5.005
4
5 =head1 DESCRIPTION
6
7 This document describes differences between the 5.004 release and this one.
8
9 =head1 About the new versioning system
10
11 Perl is now developed on two tracks: a maintenance track that makes
12 small, safe updates to released production versions with emphasis on
13 compatibility; and a development track that pursues more aggressive
14 evolution.  Maintenance releases (which should be considered production
15 quality) have subversion numbers that run from C<1> to C<49>, and
16 development releases (which should be considered "alpha" quality) run
17 from C<50> to C<99>.
18
19 Perl 5.005 is the combined product of the new dual-track development
20 scheme.
21
22 =head1 Incompatible Changes
23
24 =head2 WARNING:  This version is not binary compatible with Perl 5.004.
25
26 Starting with Perl 5.004_50 there were many deep and far-reaching changes
27 to the language internals.  If you have dynamically loaded extensions
28 that you built under perl 5.003 or 5.004, you can continue to use them
29 with 5.004, but you will need to rebuild and reinstall those extensions
30 to use them 5.005.  See L<INSTALL> for detailed instructions on how to
31 upgrade.
32
33 =head2 Default installation structure has changed
34
35 The new Configure defaults are designed to allow a smooth upgrade from
36 5.004 to 5.005, but you should read L<INSTALL> for a detailed
37 discussion of the changes in order to adapt them to your system.
38
39 =head2 Perl Source Compatibility
40
41 When none of the experimental features are enabled, there should be
42 very few user-visible Perl source compatibility issues.
43
44 If threads are enabled, then some caveats apply. C<@_> and C<$_> become
45 lexical variables.  The effect of this should be largely transparent to
46 the user, but there are some boundary conditions under which user will
47 need to be aware of the issues.  For example, C<local(@_)> results in
48 a "Can't localize lexical variable @_ ..." message.  This may be enabled
49 in a future version.
50
51 Some new keywords have been introduced.  These are generally expected to
52 have very little impact on compatibility.  See L<New C<INIT> keyword>,
53 L<New C<lock> keyword>, and L<New C<qr//> operator>.
54
55 Certain barewords are now reserved.  Use of these will provoke a warning
56 if you have asked for them with the C<-w> switch.
57 See L<C<our> is now a reserved word>.
58
59 =head2 C Source Compatibility
60
61 There have been a large number of changes in the internals to support
62 the new features in this release.
63
64 =over 4
65
66 =item Core sources now require ANSI C compiler
67
68 An ANSI C compiler is now B<required> to build perl.  See F<INSTALL>.
69
70 =item All Perl global variables must now be referenced with an explicit prefix
71
72 All Perl global variables that are visible for use by extensions now
73 have a C<PL_> prefix.  New extensions should C<not> refer to perl globals
74 by their unqualified names.  To preserve sanity, we provide limited
75 backward compatibility for globals that are being widely used like
76 C<sv_undef> and C<na> (which should now be written as C<PL_sv_undef>,
77 C<PL_na> etc.)
78
79 If you find that your XS extension does not compile anymore because a
80 perl global is not visible, try adding a C<PL_> prefix to the global
81 and rebuild.
82
83 It is strongly recommended that all functions in the Perl API that don't
84 begin with C<perl> be referenced with a C<Perl_> prefix.  The bare function
85 names without the C<Perl_> prefix are supported with macros, but this
86 support may cease in a future release.
87
88 See L<perlguts/API LISTING>.
89
90 =item Enabling threads has source compatibility issues
91
92 Perl built with threading enabled requires extensions to use the new
93 C<dTHR> macro to initialize the handle to access per-thread data.
94 If you see a compiler error that talks about the variable C<thr> not
95 being declared (when building a module that has XS code),  you need
96 to add C<dTHR;> at the beginning of the block that elicited the error.
97
98 The API function C<perl_get_sv("@",FALSE)> should be used instead of
99 directly accessing perl globals as C<GvSV(errgv)>.  The API call is
100 backward compatible with existing perls and provides source compatibility
101 with threading is enabled.
102
103 See L<API Changes for more information>.
104
105 =back
106
107 =head2 Binary Compatibility
108
109 This version is NOT binary compatible with older versions.  All extensions
110 will need to be recompiled.  Further binaries built with threads enabled
111 are incompatible with binaries built without.  This should largely be
112 transparent to the user, as all binary incompatible configurations have
113 their own unique architecture name, and extension binaries get installed at
114 unique locations.  This allows coexistence of several configurations in
115 the same directory hierarchy.  See F<INSTALL>.
116
117 =head2 Security fixes may affect compatibility
118
119 A few taint leaks and taint omissions have been corrected.  This may lead
120 to "failure" of scripts that used to work with older versions.  Compiling
121 with -DINCOMPLETE_TAINTS provides a perl with minimal amounts of changes
122 to the tainting behavior.  But note that the resulting perl will have
123 known insecurities.
124
125 Oneliners with the C<-e> switch do not create temporary files anymore.
126
127 =head2 Relaxed new mandatory warnings introduced in 5.004
128
129 Many new warnings that were introduced in 5.004 have been made
130 optional.  Some of these warnings are still present, but perl's new
131 features make them less often a problem.  See L<New Diagnostics>.
132
133 =head2 Licensing
134
135 Perl has a new Social Contract for contributors.  See F<Porting/Contract>.
136
137 The license included in much of the Perl documentation has changed.
138 See L<perl> and the individual perl man pages listed therein.
139
140 =head1 Core Changes
141
142
143 =head2 Threads
144
145 WARNING: Threading is considered an B<experimental> feature.  Details of the
146 implementation may change without notice.  There are known limitations
147 and some bugs.  These are expected to be fixed in future versions.
148
149 See L<README.threads>.
150
151 =head2 Compiler
152
153 WARNING: The Compiler and related tools are considered B<experimental>.
154 Features may change without notice, and there are known limitations
155 and bugs.  Since the compiler is fully external to perl, the default
156 configuration will build and install it.
157
158 The Compiler produces three different types of transformations of a
159 perl program.  The C backend generates C code that captures perl's state
160 just before execution begins.  It eliminates the compile-time overheads
161 of the regular perl interpreter, but the run-time performance remains
162 comparatively the same.  The CC backend generates optimized C code
163 equivivalent to the code path at run-time.  The CC backend has greater
164 potential for big optimizations, but only a few optimizations are
165 implemented currently.  The Bytecode backend generates a platform
166 independent bytecode representation of the interpreter's state
167 just before execution.  Thus, the Bytecode back end also eliminates
168 much of the compilation overhead of the interpreter.
169
170 The compiler comes with several valuable utilities.
171
172 C<B::Lint> is an experimental module to detect and warn about suspicious
173 code, especially the cases that the C<-w> switch does not detect.
174
175 C<B::Deparse> can be used to demystify perl code, and understand
176 how perl optimizes certain constructs.
177
178 C<B::Xref> generates cross reference reports of all definition and use
179 of variables, subroutines and formats in a program.
180
181 C<B::Showlex> show the lexical variables used by a subroutine or file
182 at a glance.
183
184 C<perlcc> is a simple frontend for compiling perl.
185
186 See C<ext/B/README>, L<B>, and the respective compiler modules.
187
188 =head2 Regular Expressions
189
190 Perl's regular expression engine has been seriously overhauled, and
191 many new constructs are supported.  Several bugs have been fixed.
192
193 Here is an itemized summary:
194
195 =over 4
196
197 =item Many new and improved optimizations
198
199 Changes in the RE engine:
200
201         Unneeded nodes removed;
202         Substrings merged together;
203         New types of nodes to process (SUBEXPR)* and similar expressions
204             quickly, used if the SUBEXPR has no side effects and matches
205             strings of the same length;
206         better optimizations by lookup for constant substrings;
207         Better search for constants substrings anchored by $ ;
208
209 Changes in Perl code using RE engine:
210
211         more optimizations to s/longer/short/;
212         study() was not working;
213         /blah/ may be optimized to an analogue of index() if $& $` $' not seen;
214         Unneeded copying of matched-against string removed;
215         Only matched part of the string is copying if $` $' were not seen;
216
217 =item Many bug fixes
218
219 Note that only the major bug fixes are listed here.  See F<Changes> for others.
220
221         Backtracking might not restore start of $3.
222         No feedback if max count for * or + on "complex" subexpression
223             was reached, similarly (but at compile time) for {3,34567}
224         Primitive restrictions on max count introduced to decrease a 
225             possibility of a segfault;
226         (ZERO-LENGTH)* could segfault;
227         (ZERO-LENGTH)* was prohibited;
228         Long RE were not allowed;
229         /RE/g could skip matches at the same position after a 
230           zero-length match;
231
232 =item New regular expression constructs
233
234 The following new syntax elements are supported:
235
236         (?<=RE)
237         (?<!RE)
238         (?{ CODE })
239         (?i-x)
240         (?i:RE)
241         (?(COND)YES_RE|NO_RE)
242         (?>RE)
243         \z
244
245 =item New operator for precompiled regular expressions
246
247 See L<New C<qr//> operator>.
248
249 =item Other improvements
250
251         better debugging output (possibly with colors), even from non-debugging Perl;
252         RE engine code now looks like C, not like assembler;
253         behaviour of RE modifiable by `use re' directive;
254         Improved documentation;
255         Test suite significantly extended;
256         Syntax [:^upper:] etc., reserved inside character classes;
257
258 =item Incompatible changes
259
260         (?i) localized inside enclosing group;
261         $( is not interpolated into RE any more;
262         /RE/g may match at the same position (with non-zero length)
263             after a zero-length match (bug fix).
264
265 =back
266
267 See L<perlre> and L<perlop>.
268
269 =head2   Improved malloc()
270
271 See banner at the beginning of C<malloc.c> for details.
272
273 =head2 Quicksort is internally implemented
274
275 Perl now contains its own highly optimized qsort() routine.  The new qsort()
276 is resistant to inconsistent comparison functions, so Perl's C<sort()> will
277 not provoke coredumps any more when given poorly written sort subroutines.
278 (Some C library C<qsort()>s that were being used before used to have this
279 problem.)  In our testing, the new C<qsort()> required the minimal number
280 of pair-wise compares on average, among all known C<qsort()> implementations.
281
282 See C<perlfunc/sort>.
283
284 =head2 Reliable signals
285
286 Perl's signal handling is susceptible to random crashes, because signals
287 arrive asynchronously, and the Perl runtime is not reentrant at arbitrary
288 times.
289
290 However, one experimental implementation of reliable signals is available
291 when threads are enabled.  See C<Thread::Signal>.  Also see F<INSTALL> for
292 how to build a Perl capable of threads.
293
294 =head2 Reliable stack pointers
295
296 The internals now reallocate the perl stack only at predictable times.
297 In particular, magic calls never trigger reallocations of the stack,
298 because all reentrancy of the runtime is handled using a "stack of stacks".
299 This should improve reliability of cached stack pointers in the internals
300 and in XSUBs.
301
302 =head2 Behavior of local() on array and hash elements is now well-defined
303
304 See L<perlsub/"Temporary Values via local()">.
305
306 =head2 C<%!> is transparently tied to the L<Errno> module
307
308 See L<perlvar>, and L<Errno>.
309
310 =head2 Pseudo-hashes are supported
311
312 See L<perlref>.
313
314 =head2 C<EXPR foreach EXPR> is supported
315
316 See L<perlsyn>.
317
318 =head2 Keywords can be globally overridden
319
320 See L<perlsub>.
321
322 =head2 C<$^E> is meaningful on Win32
323
324 See L<perlvar>.
325
326 =head2 C<foreach (1..1000000)> optimized
327
328 C<foreach (1..1000000)> is now optimized into a counting loop.  It does
329 not try to allocate a 1000000-size list anymore.
330
331 =head2 C<Foo::> can be used as implicitly quoted package name
332
333 Barewords caused unintuitive behavior when a subroutine with the same
334 name as a package happened to be defined.  Thus, C<new Foo @args>,
335 use the result of the call to C<Foo()> instead of C<Foo> being treated
336 as a literal.  The recommended way to write barewords in the indirect
337 object slot is C<new Foo:: @args>.  Note that the method C<new()> is
338 called with a first argument of C<Foo>, not C<Foo::> when you do that.
339
340 =head2 C<exists $Foo::{Bar::}> tests existence of a package
341
342 It was impossible to test for the existence of a package without
343 actually creating it before.  Now C<exists $Foo::{Bar::}> can be
344 used to test if the C<Foo::Bar> namespace has been created.
345
346 =head2 Better locale support
347
348 See L<perllocale>.
349
350 =head2 Experimental support for 64-bit platforms
351
352 Perl5 has always had 64-bit support on systems with 64-bit longs.
353 Starting with 5.005, the beginnings of experimental support for systems
354 with 32-bit long and 64-bit 'long long' integers has been added.
355 If you add -DUSE_LONG_LONG to your ccflags in config.sh (or manually
356 define it in perl.h) then perl will be built with 'long long' support.
357 There will be many compiler warnings, and the resultant perl may not
358 work on all systems.  There are many other issues related to
359 third-party extensions and libraries.  This option exists to allow
360 people to work on those issues.
361
362 =head2 prototype() returns useful results on builtins
363
364 See L<perlfunc/prototype>.
365
366 =head2 Extended support for exception handling
367
368 C<die()> now accepts a reference value, and C<$@> gets set to that
369 value in exception traps.  This makes it possible to propagate
370 exception objects.  This is an undocumented B<experimental> feature.
371
372 =head2 Re-blessing in DESTROY() supported for chaining DESTROY() methods
373
374 See L<perlobj/Destructors>.
375
376 =head2 All C<printf> format conversions are handled internally
377
378 See L<perlfunc/printf>.
379
380 =head2 New C<INIT> keyword
381
382 C<INIT> subs are like C<BEGIN> and C<END>, but they get run just before
383 the perl runtime begins execution.  e.g., the Perl Compiler makes use of
384 C<INIT> blocks to initialize and resolve pointers to XSUBs.
385
386 =head2 New C<lock> keyword
387
388 The C<lock> keyword is the fundamental synchronization primitive
389 in threaded perl.  When threads are not enabled, it is currently a noop.
390
391 To minimize impact on source compatibility this keyword is "weak", i.e., any
392 user-defined subroutine of the same name overrides it, unless a C<use Thread>
393 has been seen.
394
395 =head2 New C<qr//> operator
396
397 The C<qr//> operator, which is syntactically similar to the other quote-like
398 operators, is used to create precompiled regular expressions.  This compiled
399 form can now be explicitly passed around in variables, and interpolated in
400 other regular expressions.  See L<perlop>.
401
402 =head2 C<our> is now a reserved word
403
404 Calling a subroutine with the name C<our> will now provoke a warning when
405 using the C<-w> switch.
406
407 =head2 Tied arrays are now fully supported
408
409 See L<Tie::Array>.
410
411 =head2 Tied handles support is better
412
413 Several missing hooks have been added.  There is also a new base class for
414 TIEARRAY implementations.  See L<Tie::Array>.
415
416 =head2 4th argument to substr
417
418 substr() can now both return and replace in one operation.  The optional
419 4th argument is the replacement string.  See L<perlfunc/substr>.
420
421 =head2 Negative LENGTH argument to splice
422
423 Splice() with a negative LENGTH argument now work similar to what the
424 LENGTH did for substr().  Previously a negative LENGTH was treated as
425 0.  See L<perlfunc/splice>.
426
427 =head2 Magic lvalues are now more magical
428
429 When you say something like C<substr($x, 5) = "hi">, the scalar returned
430 by substr() is special, in that any modifications to it affect $x.
431 (This is called a 'magic lvalue' because an 'lvalue' is something on
432 the left side of an assignment.)  Normally, this is exactly what you
433 would expect to happen, but Perl uses the same magic if you use substr(),
434 pos(), or vec() in a context where they might be modified, like taking
435 a reference with C<\> or as an argument to a sub that modifies C<@_>.
436 In previous versions, this 'magic' only went one way, but now changes
437 to the scalar the magic refers to ($x in the above example) affect the
438 magic lvalue too. For instance, this code now acts differently:
439
440     $x = "hello";
441     sub printit {
442         $x = "g'bye";
443         print $_[0], "\n";
444     }
445     printit(substr($x, 0, 5));
446
447 In previous versions, this would print "hello", but it now prints "g'bye".
448
449 =head2 E<lt>E<gt> now reads in records
450
451 If C<$/> is a referenence to an integer, or a scalar that holds an integer,
452 E<lt>E<gt> will read in records instead of lines. For more info, see
453 L<perlvar/$/>.
454
455 =head1 Supported Platforms
456
457 Configure has many incremental improvements.  Site-wide policy for building
458 perl can now be made persistent, via Policy.sh.  Configure also records
459 the command-line arguments used in F<config.sh>.
460
461 =head2 New Platforms
462
463 BeOS is now supported.  See L<README.beos>.
464
465 DOS is now supported under the DJGPP tools.  See L<README.dos>.
466
467 MPE/iX is now supported.  See L<README.mpeix>.
468
469 =head2 Changes in existing support
470
471 Win32 support has been vastly enhanced.  Support for Perl Object, a C++
472 encapsulation of Perl.  GCC and EGCS are now supported on Win32.
473 See F<README.win32>, aka L<perlwin32>.
474
475 VMS configuration system has been rewritten.  See L<README.vms>.
476
477 The hints files for most Unix platforms have seen incremental improvements.
478
479 =head1 Modules and Pragmata
480
481 =head2 New Modules
482
483 =over
484
485 =item B
486
487 Perl compiler and tools.  See L<B>.
488
489 =item Data::Dumper
490
491 A module to pretty print Perl data.  See L<Data::Dumper>.
492
493 =item Errno
494
495 A module to look up errors more conveniently.  See L<Errno>.
496
497 =item File::Spec
498
499 A portable API for file operations.
500
501 =item ExtUtils::Installed
502
503 Query and manage installed modules.
504
505 =item ExtUtils::Packlist
506
507 Manipulate .packlist files.
508
509 =item Fatal
510
511 Make functions/builtins succeed or die.
512
513 =item IPC::SysV
514
515 Constants and other support infrastructure for System V IPC operations
516 in perl.
517
518 =item Test
519
520 A framework for writing testsuites.
521
522 =item Tie::Array
523
524 Base class for tied arrays.
525
526 =item Tie::Handle
527
528 Base class for tied handles.
529
530 =item Thread
531
532 Perl thread creation, manipulation, and support.
533
534 =item attrs
535
536 Set subroutine attributes.
537
538 =item fields
539
540 Compile-time class fields.
541
542 =item re
543
544 Various pragmata to control behavior of regular expressions.
545
546 =back
547
548 =head2 Changes in existing modules
549
550 =over
551
552 =item CGI
553
554 CGI has been updated to version 2.42.
555
556 =item POSIX
557
558 POSIX now has its own platform-specific hints files.
559
560 =item DB_File
561
562 DB_File supports version 2.x of Berkeley DB.  See C<ext/DB_File/Changes>.
563
564 =item MakeMaker
565
566 MakeMaker now supports writing empty makefiles, provides a way to
567 specify that site umask() policy should be honored.  There is also
568 better support for manipulation of .packlist files, and getting
569 information about installed modules.
570
571 Extensions that have both architecture-dependent and
572 architecture-independent files are now always installed completely in
573 the architecture-dependent locations.  Previously, the shareable parts
574 were shared both across architectures and across perl versions and were
575 therefore liable to be overwritten with newer versions that might have
576 subtle incompatibilities.
577
578 =item CPAN
579
580 See <perlmodinstall> and L<CPAN>.
581
582 =item Cwd
583
584 Cwd::cwd is faster on most platforms.
585
586 =item Benchmark
587
588 Keeps better time.
589
590 =back
591
592 =head1 Utility Changes
593
594 h2ph and related utilities have been vastly overhauled.
595
596 perlcc, a new experimental front end for the compiler is available.
597
598 The crude GNU configure emulator is now called configure.gnu.
599
600 =head1 Documentation Changes
601
602 Config.pm now has a glossary of variables.
603
604 F<Porting/patching.pod> has detailed instructions on how to create and
605 submit patches for perl.
606
607 L<perlport> specifies guidelines on how to write portably. 
608
609 L<perlmodinstall> describes how to fetch and install modules from C<CPAN>
610 sites.
611
612 Some more Perl traps are documented now.  See L<perltrap>.
613
614 =head1 New Diagnostics
615
616 =over
617
618 =item Ambiguous call resolved as CORE::%s(), qualify as such or use &
619
620 (W) A subroutine you have declared has the same name as a Perl keyword,
621 and you have used the name without qualification for calling one or the
622 other.  Perl decided to call the builtin because the subroutine is
623 not imported.
624
625 To force interpretation as a subroutine call, either put an ampersand
626 before the subroutine name, or qualify the name with its package.
627 Alternatively, you can import the subroutine (or pretend that it's
628 imported with the C<use subs> pragma).
629
630 To silently interpret it as the Perl operator, use the C<CORE::> prefix
631 on the operator (e.g. C<CORE::log($x)>) or by declaring the subroutine
632 to be an object method (see L<attrs>).
633
634 =item Bad index while coercing array into hash
635
636 (F) The index looked up in the hash found as the 0'th element of a
637 pseudo-hash is not legal.  Index values must be at 1 or greater.
638 See L<perlref>.
639
640 =item Bareword "%s" refers to nonexistent package
641
642 (W) You used a qualified bareword of the form C<Foo::>, but
643 the compiler saw no other uses of that namespace before that point.
644 Perhaps you need to predeclare a package?
645
646 =item Can't call method "%s" on an undefined value
647
648 (F) You used the syntax of a method call, but the slot filled by the
649 object reference or package name contains an undefined value.
650 Something like this will reproduce the error:
651
652     $BADREF = 42;
653     process $BADREF 1,2,3;
654     $BADREF->process(1,2,3);
655
656 =item Can't coerce array into hash
657
658 (F) You used an array where a hash was expected, but the array has no
659 information on how to map from keys to array indices.  You can do that
660 only with arrays that have a hash reference at index 0.
661
662 =item Can't goto subroutine from an eval-string
663
664 (F) The "goto subroutine" call can't be used to jump out of an eval "string".
665 (You can use it to jump out of an eval {BLOCK}, but you probably don't want to.)
666
667 =item Can't localize pseudo-hash element
668
669 (F) You said something like C<local $ar-E<gt>{'key'}>, where $ar is
670 a reference to a pseudo-hash.  That hasn't been implemented yet, but
671 you can get a similar effect by localizing the corresponding array
672 element directly -- C<local $ar-E<gt>[$ar-E<gt>[0]{'key'}]>.
673
674 =item Can't use %%! because Errno.pm is not available
675
676 (F) The first time the %! hash is used, perl automatically loads the
677 Errno.pm module. The Errno module is expected to tie the %! hash to
678 provide symbolic names for C<$!> errno values.
679
680 =item Cannot find an opnumber for "%s"
681
682 (F) A string of a form C<CORE::word> was given to prototype(), but
683 there is no builtin with the name C<word>.
684
685 =item Character class syntax [. .] is reserved for future extensions
686
687 (W) Within regular expression character classes ([]) the syntax beginning
688 with "[." and ending with ".]" is reserved for future extensions.
689 If you need to represent those character sequences inside a regular
690 expression character class, just quote the square brackets with the
691 backslash: "\[." and ".\]".
692
693 =item Character class syntax [: :] is reserved for future extensions
694
695 (W) Within regular expression character classes ([]) the syntax beginning
696 with "[:" and ending with ":]" is reserved for future extensions.
697 If you need to represent those character sequences inside a regular
698 expression character class, just quote the square brackets with the
699 backslash: "\[:" and ":\]".
700
701 =item Character class syntax [= =] is reserved for future extensions
702
703 (W) Within regular expression character classes ([]) the syntax
704 beginning with "[=" and ending with "=]" is reserved for future extensions.
705 If you need to represent those character sequences inside a regular
706 expression character class, just quote the square brackets with the
707 backslash: "\[=" and "=\]".
708
709 =item %s: Eval-group in insecure regular expression
710
711 (F) Perl detected tainted data when trying to compile a regular expression
712 that contains the C<(?{ ... })> zero-width assertion, which is unsafe.
713 See L<perlre/(?{ code })>, and L<perlsec>.
714
715 =item %s: Eval-group not allowed, use re 'eval'
716
717 (F) A regular expression contained the C<(?{ ... })> zero-width assertion,
718 but that construct is only allowed when the C<use re 'eval'> pragma is
719 in effect.  See L<perlre/(?{ code })>.
720
721 =item %s: Eval-group not allowed at run time
722
723 (F) Perl tried to compile a regular expression containing the C<(?{ ... })>
724 zero-width assertion at run time, as it would when the pattern contains
725 interpolated values.  Since that is a security risk, it is not allowed.
726 If you insist, you may still do this by explicitly building the pattern
727 from an interpolated string at run time and using that in an eval().
728 See L<perlre/(?{ code })>.
729
730 =item Explicit blessing to '' (assuming package main)
731
732 (W) You are blessing a reference to a zero length string.  This has
733 the effect of blessing the reference into the package main.  This is
734 usually not what you want.  Consider providing a default target
735 package, e.g. bless($ref, $p or 'MyPackage');
736
737 =item Illegal hex digit ignored
738
739 (W) You may have tried to use a character other than 0 - 9 or A - F in a
740 hexadecimal number.  Interpretation of the hexadecimal number stopped
741 before the illegal character.
742
743 =item No such array field
744
745 (F) You tried to access an array as a hash, but the field name used is
746 not defined.  The hash at index 0 should map all valid field names to
747 array indices for that to work.
748
749 =item No such field "%s" in variable %s of type %s
750
751 (F) You tried to access a field of a typed variable where the type
752 does not know about the field name.  The field names are looked up in
753 the %FIELDS hash in the type package at compile time.  The %FIELDS hash
754 is usually set up with the 'fields' pragma.
755
756 =item Out of memory during ridiculously large request
757
758 (F) You can't allocate more than 2^31+"small amount" bytes.  This error
759 is most likely to be caused by a typo in the Perl program. e.g., C<$arr[time]>
760 instead of C<$arr[$time]>.
761
762 =item Range iterator outside integer range
763
764 (F) One (or both) of the numeric arguments to the range operator ".."
765 are outside the range which can be represented by integers internally.
766 One possible workaround is to force Perl to use magical string
767 increment by prepending "0" to your numbers.
768
769 =item Recursive inheritance detected while looking for method '%s' in package '%s'
770
771 (F) More than 100 levels of inheritance were encountered while invoking a
772 method.  Probably indicates an unintended loop in your inheritance hierarchy.
773
774 =item Reference found where even-sized list expected
775
776 (W) You gave a single reference where Perl was expecting a list with
777 an even number of elements (for assignment to a hash). This
778 usually means that you used the anon hash constructor when you meant 
779 to use parens. In any case, a hash requires key/value B<pairs>.
780
781     %hash = { one => 1, two => 2, };   # WRONG
782     %hash = [ qw/ an anon array / ];   # WRONG
783     %hash = ( one => 1, two => 2, );   # right
784     %hash = qw( one 1 two 2 );                 # also fine
785
786 =item Undefined value assigned to typeglob
787
788 (W) An undefined value was assigned to a typeglob, a la C<*foo = undef>.
789 This does nothing.  It's possible that you really mean C<undef *foo>.
790
791 =item Use of reserved word "%s" is deprecated
792
793 (D) The indicated bareword is a reserved word.  Future versions of perl
794 may use it as a keyword, so you're better off either explicitly quoting
795 the word in a manner appropriate for its context of use, or using a
796 different name altogether.  The warning can be suppressed for subroutine
797 names by either adding a C<&> prefix, or using a package qualifier,
798 e.g. C<&our()>, or C<Foo::our()>.
799
800 =item perl: warning: Setting locale failed.
801
802 (S) The whole warning message will look something like:
803
804        perl: warning: Setting locale failed.
805        perl: warning: Please check that your locale settings:
806                LC_ALL = "En_US",
807                LANG = (unset)
808            are supported and installed on your system.
809        perl: warning: Falling back to the standard locale ("C").
810
811 Exactly what were the failed locale settings varies.  In the above the
812 settings were that the LC_ALL was "En_US" and the LANG had no value.
813 This error means that Perl detected that you and/or your system
814 administrator have set up the so-called variable system but Perl could
815 not use those settings.  This was not dead serious, fortunately: there
816 is a "default locale" called "C" that Perl can and will use, the
817 script will be run.  Before you really fix the problem, however, you
818 will get the same error message each time you run Perl.  How to really
819 fix the problem can be found in L<perllocale> section B<LOCALE PROBLEMS>.
820
821 =back
822
823
824 =head1 Obsolete Diagnostics
825
826 =over
827
828 =item Can't mktemp()
829
830 (F) The mktemp() routine failed for some reason while trying to process
831 a B<-e> switch.  Maybe your /tmp partition is full, or clobbered.
832
833 =item Can't write to temp file for B<-e>: %s
834
835 (F) The write routine failed for some reason while trying to process
836 a B<-e> switch.  Maybe your /tmp partition is full, or clobbered.
837
838 =item Cannot open temporary file
839
840 (F) The create routine failed for some reason while trying to process
841 a B<-e> switch.  Maybe your /tmp partition is full, or clobbered.
842
843 =back
844
845 =head1 BUGS
846
847 If you find what you think is a bug, you might check the headers of
848 recently posted articles in the comp.lang.perl.misc newsgroup.
849 There may also be information at http://www.perl.com/perl/, the Perl
850 Home Page.
851
852 If you believe you have an unreported bug, please run the B<perlbug>
853 program included with your release.  Make sure you trim your bug down
854 to a tiny but sufficient test case.  Your bug report, along with the
855 output of C<perl -V>, will be sent off to <F<perlbug@perl.com>> to be
856 analysed by the Perl porting team.
857
858 =head1 SEE ALSO
859
860 The F<Changes> file for exhaustive details on what changed.
861
862 The F<INSTALL> file for how to build Perl.
863
864 The F<README> file for general stuff.
865
866 The F<Artistic> and F<Copying> files for copyright information.
867
868 =head1 HISTORY
869
870 Written by Gurusamy Sarathy <F<gsar@umich.edu>>, with many contributions
871 from The Perl Porters.
872
873 Send omissions or corrections to <F<perlbug@perl.com>>.
874
875 =cut