# multi_dim(\%hash, @keys, $value) # sets $hash{$key[0]}{$key[1]}... = $value sub multi_dim { my $h = \shift; my $v = pop; $h = \$$h->{shift()} while @_; $$h = $v; }
_____________________________________________________
Jeff[japhy]Pinyan:
Perl,
regex,
and perl
hacker.
s++=END;++y(;-P)}y js++=;shajsj<++y(p-q)}?print:??;
In reply to Re: Positional keys
by japhy
in thread Positional keys
by tame1
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |