X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=pod%2Fperlvar.pod;h=b9b0ce6c0a259b5c470f7d15c4be57ac21a16d80;hb=c8984b0bd19897e6e30588055ac0338326f20a34;hp=1a120118d0f0b35b3ee910b4b74588588f5725a4;hpb=5a964f204835a8014f4ba86fc91884cff958ac67;p=p5sagit%2Fp5-mst-13.2.git diff --git a/pod/perlvar.pod b/pod/perlvar.pod index 1a12011..b9b0ce6 100644 --- a/pod/perlvar.pod +++ b/pod/perlvar.pod @@ -17,6 +17,15 @@ at the top of your program. This will alias all the short names to the long names in the current package. Some even have medium names, generally borrowed from B. +Due to an unfortunate accident of Perl's implementation, "C" +imposes a considerable performance penalty on all regular expression +matches in a program, regardless of whether they occur in the scope of +"C". For that reason, saying "C" in +libraries is strongly discouraged. See the Devel::SawAmpersand module +documentation from CPAN +(http://www.perl.com/CPAN/modules/by-module/Devel/Devel-SawAmpersand-0.10.readme) +for more information. + To go a step further, those variables that depend on the currently selected filehandle may instead (and preferably) be set by calling an object method on the FileHandle object. (Summary lines below for this @@ -127,6 +136,10 @@ The string matched by the last successful pattern match (not counting any matches hidden within a BLOCK or eval() enclosed by the current BLOCK). (Mnemonic: like & in some editors.) This variable is read-only. +The use of this variable anywhere in a program imposes a considerable +performance penalty on all regular expression matches. See the +Devel::SawAmpersand module from CPAN for more information. + =item $PREMATCH =item $` @@ -136,6 +149,10 @@ pattern match (not counting any matches hidden within a BLOCK or eval enclosed by the current BLOCK). (Mnemonic: C<`> often precedes a quoted string.) This variable is read-only. +The use of this variable anywhere in a program imposes a considerable +performance penalty on all regular expression matches. See the +Devel::SawAmpersand module from CPAN for more information. + =item $POSTMATCH =item $' @@ -151,6 +168,10 @@ string.) Example: This variable is read-only. +The use of this variable anywhere in a program imposes a considerable +performance penalty on all regular expression matches. See the +Devel::SawAmpersand module from CPAN for more information. + =item $LAST_PAREN_MATCH =item $+ @@ -164,6 +185,19 @@ example: (Mnemonic: be positive and forward looking.) This variable is read-only. +=item @+ + +$+[0] is the offset of the end of the last successfull match. +C<$+[>IC<]> is the offset of the end of the substring matched by +I-th subpattern, or undef if the subpattern did not match. + +Thus after a match against $_, $& coincides with C. Similarly, C<$>I coincides with CIC<], +$+[>IC<] - $-[>IC<]> if C<$-[>IC<]> is defined, and $+ coincides with +C. One can use C<$#+> to find the number +of subgroups in the last successful match. Note the difference with +C<$#->, which is the last I subgroup. Compare with L<"@-">. + =item $MULTILINE_MATCHING =item $* @@ -373,6 +407,20 @@ output channel. Default is 60. (Mnemonic: = has horizontal lines.) The number of lines left on the page of the currently selected output channel. (Mnemonic: lines_on_page - lines_printed.) +=item @- + +$-[0] is the offset of the start of the last successfull match. +C<$-[>IC<]> is the offset of the start of the substring matched by +I-th subpattern, or undef if the subpattern did not match. + +Thus after a match against $_, $& coincides with C. Similarly, C<$>I coincides with CIC<], +$+[>IC<] - $-[>IC<]> if C<$-[>IC<]> is defined, and $+ coincides with +C. One can use C<$#-> to find the last +matched subgroup in the last successful match. Note the difference with +C<$#+>, which is the number of subgroups in the regular expression. Compare +with L<"@+">. + =item format_name HANDLE EXPR =item $FORMAT_NAME @@ -448,6 +496,8 @@ Under VMS, the pragma C makes C<$?> reflect the actual VMS exit status, instead of the default emulation of POSIX status. +Also see L. + =item $OS_ERROR =item $ERRNO @@ -463,6 +513,8 @@ to C<$!> to set I if, for instance, you want C<"$!"> to return the string for error I, or you want to set the exit value for the die() operator. (Mnemonic: What just went bang?) +Also see L. + =item $EXTENDED_OS_ERROR =item $^E @@ -490,6 +542,8 @@ via C<$!>. Caveats mentioned in the description of C<$!> generally apply to C<$^E>, also. (Mnemonic: Extra error explanation.) +Also see L. + =item $EVAL_ERROR =item $@ @@ -503,6 +557,8 @@ Note that warning messages are not collected in this variable. You can, however, set up a routine to process warnings by setting C<$SIG{__WARN__}> as described below. +Also see L. + =item $PROCESS_ID =item $PID @@ -618,6 +674,15 @@ of perl in the right bracket?) Example: See also the documentation of C and C for a convenient way to fail if the Perl interpreter is too old. +=item $COMPILING + +=item $^C + +The current value of the flag associated with the B<-c> switch. Mainly +of use with B<-MO=...> to allow code to alter its behaviour when being compiled. +(For example to automatically AUTOLOADing at compile time rather than normal +deferred loading.) Setting C<$^C = 1> is similar to calling C. + =item $DEBUGGING =item $^D @@ -635,7 +700,7 @@ descriptors are not. Also, during an open(), system file descriptors are preserved even if the open() fails. (Ordinary file descriptors are closed before the open() is attempted.) Note that the close-on-exec status of a file descriptor will be decided according to the value of -C<$^F> at the time of the open, not the time of the exec. +C<$^F> when the open() or pipe() was called, not the time of the exec(). =item $^H @@ -709,6 +774,12 @@ Start with single-step on. Note that some bits may be relevent at compile-time only, some at run-time only. This is a new mechanism and the details may change. +=item $^R + +The result of evaluation of the last successful L> +regular expression assertion. (Excluding those used as switches.) May +be written to. + =item $^S Current state of the interpreter. Undefined if parsing of the current @@ -774,12 +845,16 @@ specified, and the value is the location of the file actually found. The C command uses this array to determine whether a given file has already been included. -=item %ENV $ENV{expr} +=item %ENV + +=item $ENV{expr} The hash %ENV contains your current environment. Setting a value in C changes the environment for child processes. -=item %SIG $SIG{expr} +=item %SIG + +=item $SIG{expr} The hash %SIG is used to set signal handlers for various signals. Example: @@ -797,6 +872,10 @@ signals. Example: $SIG{'INT'} = 'DEFAULT'; # restore default action $SIG{'QUIT'} = 'IGNORE'; # ignore SIGQUIT +Using a value of C<'IGNORE'> usually has the effect of ignoring the +signal, except for the C signal. See L for more about +this special case. + The %SIG array contains values for only the signals actually set within the Perl script. Here are some other examples: @@ -869,3 +948,54 @@ See L, L and L for additional info. =back + +=head2 Error Indicators + +The variables L<$@>, L<$!>, L<$^E>, and L<$?> contain information about +different types of error conditions that may appear during execution of +Perl script. The variables are shown ordered by the "distance" between +the subsystem which reported the error and the Perl process, and +correspond to errors detected by the Perl interpreter, C library, +operating system, or an external program, respectively. + +To illustrate the differences between these variables, consider the +following Perl expression: + + eval ' + open PIPE, "/cdrom/install |"; + @res = ; + close PIPE or die "bad pipe: $?, $!"; + '; + +After execution of this statement all 4 variables may have been set. + +$@ is set if the string to be C-ed did not compile (this may happen if +C or C were imported with bad prototypes), or if Perl +code executed during evaluation die()d (either implicitly, say, +if C was imported from module L, or the C after +C was triggered). In these cases the value of $@ is the compile +error, or C error (which will interpolate C<$!>!), or the argument +to C (which will interpolate C<$!> and C<$?>!). + +When the above expression is executed, open(), C<>, and C +are translated to C run-time library calls. $! is set if one of these +calls fails. The value is a symbolic indicator chosen by the C run-time +library, say C. + +On some systems the above C library calls are further translated +to calls to the kernel. The kernel may have set more verbose error +indicator that one of the handful of standard C errors. In such cases $^E +contains this verbose error indicator, which may be, say, C. On systems where C library calls are identical to system calls +$^E is a duplicate of $!. + +Finally, $? may be set to non-C<0> value if the external program +C fails. Upper bits of the particular value may reflect +specific error conditions encountered by this program (this is +program-dependent), lower-bits reflect mode of failure (segfault, completion, +etc.). Note that in contrast to $@, $!, and $^E, which are set only +if error condition is detected, the variable $? is set on each C or +pipe C, overwriting the old value. + +For more details, see the individual descriptions at L<$@>, L<$!>, L<$^E>, +and L<$?>.