Re^5: initialize all values in a hash

I mostly use Tie::Hash::Vivify to prevent autovivification thus:

  my $hashref = Tie::Hash::Vivify->new(
    sub { confess("No auto-vivifying!\n".Dumper(\@_)) }
  )
[download]

to avoid those annoyingly hard-to-track-down bugs where you've typoed a hash key.

Comment on Re^5: initialize all values in a hash Download Code

Replies are listed 'Best First'.
Re^6: initialize all values in a hash by tobyink (Canon) on May 18, 2012 at 16:49 UTC
The autovivification module is pretty good for this kind of thing. Offers you the ability to simply switch off autovivification, warn about it, or croak. Rather than being tied to a particular hash, it's lexically scoped. And it's context-sensitive, so you could decide that 'store' operations are allowed to autovivify, like: `{ no autovivification qw(strict); use autovivification qw(store); my %hash; $hash{foo}{bar}{baz} = 1; # autovivifies OK delete $hash{fool}{bar}{baz}; # dies }` [download] If only autovivification weren't so tricky to type. `perl -E'sub Monkey::do{say$_,for@_,do{($monkey=[caller(0)]->[3])=~s{::}{ }and$monkey}}"Monkey say"->Monkey::do'`	[reply] [d/l]

Replies are listed 'Best First'.

Re^6: initialize all values in a hash
by tobyink (Canon) on May 18, 2012 at 16:49 UTC

The autovivification module is pretty good for this kind of thing. Offers you the ability to simply switch off autovivification, warn about it, or croak. Rather than being tied to a particular hash, it's lexically scoped. And it's context-sensitive, so you could decide that 'store' operations are allowed to autovivify, like:

{
  no autovivification qw(strict);
  use autovivification qw(store);
  my %hash;
  $hash{foo}{bar}{baz} = 1;     # autovivifies OK
  delete $hash{fool}{bar}{baz}; # dies
}
[download]

If only autovivification weren't so tricky to type.

perl -E'sub Monkey::do{say$_,for@_,do{($monkey=[caller(0)]->[3])=~s{::}{ }and$monkey}}"Monkey say"->Monkey::do'

[reply]
[d/l]