X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Fautovivification.git;a=blobdiff_plain;f=lib%2Fautovivification.pm;h=5eabf25c6965ca5a69d21ea836639ecc5560b423;hp=bf8b735bc444f8b818a6016ef270182011f8a609;hb=3b30e5cce1db5d76cf705f5b7b4f5c9fc4913a8a;hpb=66428fedeb44f5f3e3d49a94c20d7ce3021dd283 diff --git a/lib/autovivification.pm b/lib/autovivification.pm index bf8b735..5eabf25 100644 --- a/lib/autovivification.pm +++ b/lib/autovivification.pm @@ -1,6 +1,6 @@ package autovivification; -use 5.008001; +use 5.008003; use strict; use warnings; @@ -11,13 +11,13 @@ autovivification - Lexically disable autovivification. =head1 VERSION -Version 0.06 +Version 0.10 =cut our $VERSION; BEGIN { - $VERSION = '0.06'; + $VERSION = '0.10'; } =head1 SYNOPSIS @@ -110,8 +110,10 @@ Turns off autovivification for lvalue dereferencing expressions, such as : $hashref->{$key} = $value for ($arrayref->[$idx]) { ... } for ($hashref->{$key}) { ... } + function($arrayref->[$idx]) + function($hashref->{$key}) -An exception is thrown if vivification is needed to store the value, which means that effectively you can only assign to levels that are already defined +An exception is thrown if vivification is needed to store the value, which means that effectively you can only assign to levels that are already defined. In the example, this would require C<$arrayref> (resp. C<$hashref>) to already be an array (resp. hash) reference. =item * @@ -130,7 +132,7 @@ Throws an exception when an autovivification is avoided. Each call to C adds the specified features to the ones already in use in the current lexical scope. -When C<@opts> is empty, it defaults to C. +When C<@opts> is empty, it defaults to C<< qw >>. =cut @@ -146,7 +148,7 @@ my %bits = ( sub unimport { shift; my $hint = _detag($^H{+(__PACKAGE__)}) || 0; - @_ = qw/fetch exists delete/ unless @_; + @_ = qw unless @_; $hint |= $bits{$_} for grep exists $bits{$_}, @_; $^H |= 0x00020000; $^H{+(__PACKAGE__)} = _tag($hint); @@ -186,7 +188,7 @@ This constant only has a meaning with your perl is threaded ; otherwise, it'll a =head2 C True iff this module could have been built with fork-safety features enabled. -This will always be true except on Windows where it's false for perl 5.10.0 and below . +This will always be true except on Windows where it's false for perl 5.10.0 and below. =head1 CAVEATS @@ -196,7 +198,10 @@ If warnings are turned on, Perl will complain about one-element slices. =head1 DEPENDENCIES -L 5.8.1. +L 5.8.3. + +A C compiler. +This module may happen to build with a C++ compiler as well, but don't rely on it, as no guarantee is made in this regard. L (standard since perl 5.006). @@ -229,7 +234,7 @@ Matt S. Trout asked for it. =head1 COPYRIGHT & LICENSE -Copyright 2009,2010 Vincent Pit, all rights reserved. +Copyright 2009,2010,2011 Vincent Pit, all rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.