|
NAMEautovivification - Lexically disable autovivification.VERSIONVersion 0.18SYNOPSISno autovivification; my $hashref; my $a = $hashref->{key_a}; # $hashref stays undef if (exists $hashref->{option}) { # Still undef ... } delete $hashref->{old}; # Still undef again $hashref->{new} = $value; # Vivifies to { new => $value } DESCRIPTIONWhen an undefined variable is dereferenced, it gets silently upgraded to an array or hash reference (depending of the type of the dereferencing). This behaviour is called autovivification and usually does what you mean (e.g. when you store a value) but it may be unnatural or surprising because your variables gets populated behind your back. This is especially true when several levels of dereferencing are involved, in which case all levels are vivified up to the last, or when it happens in intuitively read-only constructs like "exists".This pragma lets you disable autovivification for some constructs and optionally throws a warning or an error when it would have happened. METHODS"unimport"no autovivification; # defaults to qw<fetch exists delete> no autovivification qw<fetch store exists delete>; no autovivification warn => @categories; no autovivification strict => @categories; Magically called when "no autovivification @opts" is encountered. Enables the features given in @opts, which can be :
Each call to "unimport" adds the specified features to the ones already in use in the current lexical scope. When @opts is empty, it defaults to "qw<fetch exists delete>". "import"use autovivification; # default Perl behaviour use autovivification qw<fetch store exists delete>; Magically called when "use autovivification @opts" is encountered. Disables the features given in @opts, which can be the same as for "unimport". Each call to "import" removes the specified features to the ones already in use in the current lexical scope. When @opts is empty, it defaults to restoring the original Perl autovivification behaviour. CONSTANTS"A_THREADSAFE"True if and only if the module could have been built with thread-safety features enabled. This constant only has a meaning when your perl is threaded, otherwise it will always be false."A_FORKSAFE"True if and only if this module could have been built with fork-safety features enabled. This constant will always be true, except on Windows where it is false for perl 5.10.0 and below.CAVEATSUsing this pragma will cause a slight global slowdown of any subsequent compilation phase that happens anywere in your code - even outside of the scope of use of "no autovivification" - which may become noticeable if you rely heavily on numerous calls to "eval STRING".The pragma doesn't apply when one dereferences the returned value of an array or hash slice, as in "@array[$id]->{member}" or @hash{$key}->{member}. This syntax is valid Perl, yet it is discouraged as the slice is here useless since the dereferencing enforces scalar context. If warnings are turned on, Perl will complain about one-element slices. Autovivifications that happen in code "eval"'d during the global destruction phase of a spawned thread or pseudo-fork (the processes used internally for the "fork" emulation on Windows) are not reported. DEPENDENCIESperl 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. XSLoader (standard since perl 5.6.0). SEE ALSOperlref.AUTHORVincent Pit, "<perl at profvince.com>", <http://www.profvince.com>.You can contact me by mail or on "irc.perl.org" (vincent). BUGSPlease report any bugs or feature requests to "bug-autovivification at rt.cpan.org", or through the web interface at <http://rt.cpan.org/NoAuth/ReportBug.html?Queue=autovivification>. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.SUPPORTYou can find documentation for this module with the perldoc command.perldoc autovivification ACKNOWLEDGEMENTSMatt S. Trout asked for it.COPYRIGHT & LICENSECopyright 2009,2010,2011,2012,2013,2014,2015,2017 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.
Visit the GSP FreeBSD Man Page Interface. |