X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FScope%2FUpper.pm;h=ae9683d3aba0e4ed0069e211620f1df3d9e19dc0;hb=ac794d1f5c02a97322dad2aa7e435466395cb928;hp=083536422eba2dc3e1dc565041384cdcfff6dae3;hpb=bac4fc46c2d48ce5db75de6c88e0983aeeedf865;p=perl%2Fmodules%2FScope-Upper.git diff --git a/lib/Scope/Upper.pm b/lib/Scope/Upper.pm index 0835364..ae9683d 100644 --- a/lib/Scope/Upper.pm +++ b/lib/Scope/Upper.pm @@ -87,15 +87,16 @@ For example, if C<$value> is a scalar reference, then the C slot of the =item * -A string beginning with a sigil, representing the symbol to localize and assign to. -If the sigil is C<'$'>, then C<$value> isn't dereferenced, that is +A string beginning with a sigil, representing the symbol to localize and to assign to. +If the sigil is C<'$'>, L follows the same syntax as C, i.e. C<$value> isn't dereferenced. +For example, localize '$x', \'foo' => 0; will set C<$x> to a reference to the string C<'foo'>. -Other sigils behave as if a glob was passed. +Other sigils (C<'@'>, C<'%'>, C<'&'> and C<'*'>) require C<$value> to be a reference of the corresponding type. -The symbol is resolved when the actual localization takes place and not when C is called. +When the symbol is given by a string, it is resolved when the actual localization takes place and not when C is called. This means that sub tag { localize '$x', $_[0] => 1; } @@ -129,6 +130,31 @@ our %EXPORT_TAGS = ( our @EXPORT_OK = map { @$_ } values %EXPORT_TAGS; $EXPORT_TAGS{'all'} = [ @EXPORT_OK ]; +=head1 CAVEATS + +Be careful that local variables are restored in the reverse order in which they were localized. +Consider those examples: + + local $x = 0; + { + reap sub { print $x } => 0; + local $x = 1; + ... + } + # prints '0' + ... + { + local $x = 1; + reap sub { $x = 2 } => 0; + ... + } + # $x is 0 + +The first case is "solved" by moving the C before the C, and the second by using L instead of L. + +L, L and L effects can't cross C blocks, hence calling those functions in C is deemed to be useless. +This is an hopeless case because C blocks are executed once while localizing constructs should do their job at each run. + =head1 DEPENDENCIES L (standard since perl 5.006). @@ -153,6 +179,8 @@ You can find documentation for this module with the perldoc command. perldoc Scope::Upper +Tests code coverage report is available at L. + =head1 ACKNOWLEDGEMENTS Inspired by Ricardo Signes.